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Editorial—] 



L*iu (sAtf, 


so wie nebenstehend abgebildet, hätte Ihre 
Schneider International ausgesehen, wenn wir 
bereits mit dieser Ausgabe einem Wunsche vieler 
unserer Leser entsprochen hätten. 

Unser bisheriges Titellogo, zu einer Zeit entstan¬ 
den, als der CPC das einzige Kind der 
Schneider-Familie war, ist in der Zwischenzeit 
in die Jahre gekommen und durch die Ent¬ 
wicklung auf dem Computermarkt überholt. 

Logisch, daß wir darauf reagieren müssen. 

Zumal viele unserer Leser (dies ist eines der er¬ 
sten Ergebnisse, die wir aus unserer Umfrage 
entnehmen können) wünschen, ihre Zeitschrift 
den Verhältnissen angepaßt zu sehen. Im Klar¬ 
text bedeutet dies, daß aus den drei Buchstaben 
»CPC« das erste »C« gestrichen werden 
mußte. 

Schließlich vertreten sowohl wir, der Hersteller 
Schneider, als auch Sie, liebe Leser, die Mei¬ 
nung, daß es sich bei den CPC-Computern nicht 
um Spielzeuge, sondern um Personal Computer 
handelt, und zwar um PC’s der Low-Cost- 
Klasse. 

Daß der Joyce sowie der neue 1512 PC’s sind ist 
unbestritten, so daß die Bezeichnung »PC« im 
Titel von Schneider International allen drei 
Computertypen der Schneider-Familie gerecht 
wird. 

Freilich, die CPC’ler sind die Leser der ersten Stunde, die wir auf keinen Fall vernachlässigen werden. Nach wie vor 
bleibt der überwiegende Teil der Schneider International dieser Produktgruppe Vorbehalten. Kommen neue Compu¬ 
ter hinzu, wie jetzt der PC 1512 über die wir berichten müssen, so wird dies durch entsprechend mehr Seitenumfang 
aufgefangen. Sie sehen also, daß wir Ihnen, liebe CPC-Freunde, nicht weniger Informationen bieten, sondern eher 
mehr. Dies kommt insbesondere den vielen CPC-Usem entgegen, die entweder gleich oder zu einem späteren Zeit¬ 
punkt auf eines der anderen Schneider-Systeme umsteigen wollen. Und für diejenigen, die diese Absicht nicht haben, 
kann eine zusätzliche Information auch nur Gewinn bringen. In diesem Sinne erweitern wir ab dieser Ausgabe unse¬ 
ren Seitenumfang um weitere 16 Seiten, die insbesondere dem neuen PC gewidmet sein werden. Ab der Ausgabe 1/87 
wird sich Ihre Schneider International dann mit einem dem hier abgebildeten Foto entsprechenden Look 
präsentieren. 

Des weiteren wird die durch diese Veränderung hervorgerufene Abgrenzung einer PC-Rubrik(—Professional Compu¬ 
ting) der Heftgliederung, und damit der Übersichtlichkeit, entgegenkommen. Einem weiteren Wunsch vieler Leser 
kommen wir mit dem in dieser Ausgabe veröffentlichten Jahresinhaltsverzeichnis nach, das Ihnen alle Beiträge des 
Jahres 1986 im Überblick und nach Stichworten sortiert, präsentiert. Das sind immerhin 1600 Seiten Schneider 
International! 

In diesem Sinne wünschen wir allen unseren Lesern ein frohes und friedliches Weihnachtsfest und freuen uns mit 
Ihnen, den dritten Jahrgang von Schneider International mit der Ausgabe 1/87 zu starten. 



K. 



Stefan Ritter 
(Chefredakteur) 
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I—Briefe 


Eine Bitte an 
unsere Leser 

Die Rubrik »Leserbriefe« ist 
eine Einrichtung für alle Le¬ 
ser, die in irgendeiner Form 
Fragen, Probleme oder An¬ 
regungen zu Produkten, Pro¬ 
grammierproblemen oder zu 
unserer Zeitschrift haben. 
Selbstverständlich sind wir 
bemüht, alle Leserfragen zu 
beantworten. Doch haben 
Sie bitte Verständnis, daß wir 
nicht alle eingehenden Briefe 
persönlich beantworten kön¬ 
nen. Oft erreichen uns 
mehrere Briefe zum gleichen 
Thema, einer davon wird 
dann stellvertretend für alle 
in unserer Zeitschrift beant- 

Ergänzung zu 
Screen-Input, 

Heft 10/86 

In einigen Fällen kann es 
Vorkommen, daß sich die 
Inputfelder zu dem übrigen 
Bildschirm verschieben. 
Dieser Fehler kann durch 
Einfügung folgender Zeile 
behoben werden: 

185 cls$=CHR$(13)+cls$ 
H.-J. Meyer 
3207 Harsum 


Fehler im 
Uhrentreiber 

Leider wurde in Heft 10/86, 
Seite 84, eine falsche Version 
des Treiberprogrammes für 
die Schneiderware-Uhr ab¬ 
gedruckt. 

Einige Leser sandten die 
Bausteine zur Überprüfung 
ein; diese wurden sämtlich 
als lauffähig befunden und 
zurückgeschickt. 

Der Grund für die Nicht¬ 
funktion sind sieben Zeilen 
aus dem o.a. Listing. 

Im Anschluß finden Sie die 
korrekten Zeilen, die Sie bitte 
anstatt der alten Zeilen ein¬ 
geben wollen. 

Redaktion 


wortet. Da auch wir nicht alle 
Fragen auf Anhieb beant¬ 
worten können, müssen wir 
recherchieren. Und das dau¬ 
ert bekanntlich seine Zeit!! 
Wir möchten hiermit alle 
CPC-Leser noch einmal auf 
unseren Leser-Service hin- 
weisen und bitten bei der 
Vielzahl der eingehenden 
Briefe um etwas Geduld. Für 
eilige Anfragen steht unsere 
Redaktion jeden Mittwoch 
von 17-20 Uhr am »Heißen 
Draht« zur Verfügung. Vie¬ 
len Dank für Ihr Verständnis. 

Ihre C'PC-Redaktion 

PS: Die Redaktion behält sich 
vor, Leserzuschriften in ge¬ 
kürzter Form wiederzugeben. 

Joyce-Anwender 
mit zwei Disketten¬ 
laufwerken 

Das zweite Diskettenlauf¬ 
werk des Joyce besitzt zwei 
Schreib-fLeseköpfe. Ein 
Umdrehen der Disketten ist 
somit nicht mehr nötig. For¬ 
matieren Sie die Disketten 
in Laufwerk B so, daJS Seite 
Azurn Bildschirm zeigt, und 
legen Sie diese Diskette in 
Zukunft immer nur mit Seite 
A zum Bildschirm zeigend 
in das Laufwerk. 

Mit freundlichen Grüßen 

Schneider AG 
Computer Division 

Tokio-Express 

Ich bin seit zwei Jahren 
stolzer Besitzer eines CPC 
6128 und habe mir auf An¬ 
raten meines Kumpels Ihr 
Magazin gekauft. Ich muß 
sagen, daß ich von Ihrer 
leicht verständlichen Schreib¬ 
weise angenehm überrascht 
bin. 

Nun möchte ich Sie noch auf 
einen Druckfehler im Listing 
vom Tokio-Express aus Heft 
10/86aufmerksam machen. 
Da steht in Zeile 640: LO- 
CATE 4,7:PRINT a%. Da¬ 


durch rutscht der Schriftzug 
”Tokio-Express" ein wenig 
aus seinem dafür vorgese¬ 
henen Feld. Wenn man Zeile 
640 wie folgt ändert, kommt 
der "Tokio-Express”wieder 
ins Lol: 

LOCATE 13,7:PRINTa%. 

Ich weiß, daß das keine 
großartige Entdeckung ist 
(Profi’s wie z.B. Herr Lei¬ 
tenberger, haben den Fehler 
bestimmt gleich korrigiert), 
hoffe aber, daß ich damit 
anderen Anfängern helfen 
kann. 

Herbert Jenning, 
Hamburg 


CPC: 

Eigentlich ist das kein 
Fehler, da es den Pro¬ 
grammablauf nicht stört 
und nur beim 664 und 6128 
auftritt. Der Trick mit der 
gleichzeitigen Darstellung 
zweier Modes klappt hier 
leider nicht. Trotzdem sieht 
das Ganze so besser aus. 
Schönen Dank. 


Recycling 

Sehr gefreut habe ich mich 
über den Tip des Lesers V. 
Siebürger aus der CPC Inter¬ 
national 10/86, die meist 
recht kurze Lebensspanne 
von Drucker-Farbbändern 
mittels eines Stückes Stem¬ 
pelkissen kräftig in die Länge 
zu ziehen. Auch für mich 
(bzw. meine Brieftasche) be¬ 
deutet der immense Appetit 
meines NLQ 401 auf die 
teuren Bänder einen ziemli¬ 
chen Streß. 

Mit der praktischen A usfüh- 
rung des Tips hatte ich dann 
allerdings meine Probleme. 
Auf den Druckkopf (?!), wie 
von Herm/Frau Siebürger 
vorgeschlagen, wollte ich das 
Kissen nun wirklich nicht 
kleben, und auch sonst fand 
sich im Drucker kein geeig¬ 
netes Plätzchen. Der NLQ 
401 zieht das Band auch gar 
nicht stramm genug, um 
nennenswerte Farbmengen 


aus einem wo-auch-immer 
hingeklebten Stempelkissen 
zu pressen. 

So verfiel ich schließlich auj 
folgende Idee: Ich schnitt mir 
ein 3*2 cm grojhes Stück 
Stempelkissen zurecht und 
schnitt dieses dann auf einer 
Breitseite einen guten Zenti¬ 
meter tief ein. Als Befesti¬ 
gungsstelle hatte ich mir die 
blaue Kunststojführung aus¬ 
gesucht, die man rechts im 
Drucker einsteckt und die das 
Farbband in Richtung Druck¬ 
kopf umlenkt. Auf diese 
Führung (die ich dem Druk- 
ker dazu natürlich entnom¬ 
men hatte) klebte ich das 
Kissen nun so auf, daß das 
Band in Zukunft durch den 
Einschnitt läuft. Mit dem 
Zweikomponenten-KIeber 
kann man hierbei ruhig groß¬ 
zügig umgehen, man sollte 
jedoch aufpassen, dajl man 
nicht gleichzeitig das Farb¬ 
band an der Führung fest¬ 
klebt (Na, na - wer hat da 
gelacht?!). 

Ist der Kleber nun ausgehär¬ 
tet und das Band wieder im 
Drucker, so wird man fest¬ 
stellen, daji auch diese Me¬ 
thode leider nicht in der Lage 
ist, das Farbband kontinu¬ 
ierlich mit neuer Farbe zu 
versorgen. Deswegen defi¬ 
niert man sich am besten 
einen geeigneten String (a% 
=STR1NG%(255, ”. ”)) und 
legt diesen auf eine Funk¬ 
tionstaste (KEY l,”?#8,a$" 
+CHR$(13)). Nun tränkt 
man das Kissen reichlich, 
aber nicht überreichlich, mit 
Stempelfarbe, drückt auf die 
Taste 1 vom Zehnerblock, läßt 
den Drucker drucken, tränkt 
nach, drückt die Taste... bis 
das ganze Band einmal durch¬ 
gelaufen ist. Anschließend 
läfit man das Ganze über 
Nacht stehen, damit sich 
eventuelle Konzentrations¬ 
unterschiede ausgleichen kön¬ 
nen, und hat dann am näch¬ 
sten Morgen ein praktisch 
„neues ” Farbband. 

Wer allerdings nicht ohne¬ 
hin schon Umweltschutzpa¬ 
pier verwendet (warum ei¬ 
gentlich nicht?), der sollte 


50010 DATA 8sBC, &09, 5»80, &0d, &80, &1B, &80 , &C3, 616 
50220 DATA &CB,&97,&CB,&87,&CB,&CF,&01,&E2, 1329 
50230 DATA SFB, &ED, &79, &7C,&01, &E3 , &FB, 8sED, 1449 

50240 DATA &79, &3E, &F4, &01, &B2, 8rFB, 3iED, &79, 1263 

50300 DATA &8F, 8rCB, »87, &01, &E2, SFB, &ED, &79, 1317 

50310 DATA &AF, &01, SE4, &FB, SED, &7ö, Sj57, &3E, 1161 

50320 DATA &F4,&01,&E2,&FB,&ED,&79,&7A,&D1, 1411 
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Hans Lorenz Schneider 
Das Schneider CPC Grafikbuch 

Die vielfältigen Grafikmöglichkeiten Ihres Schneider CPC (464, 664 und 6128). 
Von einer allgemeinen Einführung über ergänzende Grafikbefehle, Erstellung 
von Grafiken mit dem Joystick, Darstellung zwei- und dreidimensionaler Diagramm- 
Formen, künstlerische Grafiken, Zusammenspiel zwischen Grafik und Datenträger 

bis hin zur Hardcopy. 
328 Seiten / zahle Abb. ISBN 3-88745-611-4 (1986) 

Best.-Nr. 3611 0M48,-/sFr. 44,20/S 374 - 


/"V 

TSYBEX 

v> 


Schneider CPC 

Erfolg mit Multiplan 



Thorsion Rifltr 


Michael A. Beisecker 
Schneider CPC - Arbeiten mit dBASE 1/ 

dBASE II ist im PC-Bereich wohl eines der leistungsstärksten Datenbankprogramme. 
Benutzern eines Schneider CPC vermittelt ein echter Experte in diesem Buch 
alle Kenntnisse, die für den erfolgreichen Einsatz von dBASEH wichtig sind, z. B. .- 
Installation von und Programmieren mit dBASEII, Editieren von Dateien mit 
Wordstar, Tips und Tricks. Jeder Lernschritt wird durch praxisgerechte Beispiele 
ergänzt. Und zwar so. daß dem Leser die Umsetzung dann wir!ich problemlos 
möglich ist. Ein Buch, das in jeder Arbeitsphase weiterhilft. 
272 Seiten/mit Abb. ISBN 3-88745-660-2 (1986) 

Best. -Nr. 3660 DM 48,- /sFr. 44,20/S 374,- 


Karl-Hermann Rollke 

Schneider CPC-Arbeiten mit Turbo Pascal 


Der Bestseller „ Das Turbo Pascal Buch “ wurde speziell für Besitzer eines Schneider 
CPC überarbeitet. So ermöglicht es den optimalen Einsatz der leistungsfähigen 
Programmiersprache - auf die CPC-Arbeits- und Systemumgebung zugeschnitten 
und durch zusätzliche Informationen ergänzt. Zahlreiche Beispiele veranschaulichen 
die vorgestellten Programmierkonzepte. Übungen zu jedem Kapitel machen dieses 
leicht verständlich geschriebene Buch auch für Einsteiger zur unentbehrlichen 
Arbeitshilfe. 


296 Seiten / mit Abb. 
Best.-Nr. 3649 


ISBN 3-88745-649-1 (1986) 
DM48,-jsFr. 44,20/S 374- 


^Ss^Das $ 

Schneider CPC 

Grafikbuch 



Hans Lorenz Schneider 



Thorsten Ritter 

Schneider CPC - Erfolg mit Multiplan 

Ein didaktisch hervorragendes Lehrbuch und Nachschlagewerk für CPC-Besitzer, die 
das Tabellehkalkulationsprogramm Multiplan an wenden wollen. Das Buch ist die 
überarbeitete, auf den CPC zugeschnittene Version des Bestsellers „Erfolg mit Multi¬ 
plan“ und führt Schritt für Schritt in das Programm ein. An konkreten Beispielen 
wird erklärt, welchen Nutzen CPC-Besitzer mit Multiplan in der Praxis haben. 

200 Seiten / ca. 45 Abb. ISBN 3-88745-639-4 (1986) 

Best.-Nr. 3639 DM48,-/sFr. 44,20/S374,- 


/V 

TSYBEX 

\> 


Schneider CPC 

Arbeiten mit 
dBASE II 




Arbeiten mit dem 

Schneider CPC 


Hans Lorenz Schneider 


Arthur Naiman 
Schneider CPC - Einführung in Wordstar 

Der Bestseller zum populärsten Textverarbeitungsprogramm wurde für die Besitzer 
des CPC überarbeitet. Und damit wichtige Hilfe und Nachschlagewerk bei der Arbeit 
mit Wordstar und Mail-Merge auf dem CPC. Neben der klaren Einführung in den 
effektiven Umgang mit Wordstar gibt es u. a. auch wertvolle Hinweise für die Instal¬ 
lation von Druckern und zu Systempatches. 
280 Seiten / ca. 40 Abb. ISBN 3-88745-646-7 (1986) 
Best.-Nr. 3646 DM42-jsFr. 38,60/S328,- 


Michorf A. Bonockor 


NEU 


Hans Lorenz Schneider 
Arbeiten mit dem Schneider CPC 

Der Autor vermittelt alle Informationen zur BASIC-Programmierung Ihres Rechners, 
wie z. B. : allgemeine Routinen, die Sie immer wieder benötigen.- Einsatzmöglich¬ 
keiten des Zeichensatzes; hochauflösende Grafik und ihre Anwendung, Routinen zur 
Darstellung von Sprites und Hardcopies; Dateiverwaltung und Sound-Editor; 
wichtige Betriebssystem-Routinen; Möglichkeiten der BASIC-Erweiterung. Eine 
umfassende und didaktisch aufbereitete Arbeitshilfe für Anfängerund fortgeschrit¬ 
tene CPC-Anwender. 

228 Seiten /113 Abb. ISBN 3-88745-603-3 (1985) 

Best. -Nr. 3603 DM 38,-/sFr. 35,-/S296.- 


Schneider CPC 

Einführung in 
Wordstar 
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Zubehör nur vom Fachmann! 

Disketten: 

3“ Panasonic CF2D 1 

- 9 Sick 

DM 

9,50 


10 Sick 

DM 

90,- 

3" Neutrale Verpackung 1 

- 9 Sick 

DM 

9,- 

100 % Error Free 

lOStck 

DM 

85,- 

3 5" Fuji MF ID—67,5 Ipi 

10 Sick 

DM 

49, 

3,5- Fuji MF "Di! -135 Ipi 

10 Sick 

DM 

55,- 

3.5" Fun MF 2D - 67 5 tpi 

lOStc* 

UM 

55- 

3,5" Fuji MF 20D-135 Ipi 

10 Sick 

UM 

bB- 

3.5" Neutra! MF 100-135 ipi 

10 Sick 

UM 

45,- 

3,5" Neutral MF2DD-135bi 

10 Sick 

DM 

50 - 

3,5" Nashua MF1DD-135 tp 

10 Sick 

DM 

52- 

3,5" Nashua MF2DD 1351p 
5 1/4" Fu MD1D-40 tpi 

10 Stck 

DM 

61 - 

schwarz+larbig 

5 1/4" Fu MD2D-48 Ipi 

10 Sink 

DM 

34,- 

schwarz+larbig 

IC Sick 

DM 

45, 

51/4” Fuji MD2DD-96 lai 
schwarz 

51/4- Neutral 1D-48 tpi 

10 Stck 

OM 

49- 

schwarz 

5114 1 Neutral 2D-48 tpi 

10 Sick 

DM 

9.90 

schwarz 

10 Sick 

DM 

13,50 

51/4" Neutral 2DD-96 tpi 
schwarz 

10 Sick 

DM 

19,50 

Diskettenboxen 

3"-Box ohne Schloß lür 

40 Sick 

DM 

29,- 

3"—Box mil Schloß lür 

40 Sick. 

UM 

3b- 

3' — Bcx ohne Schloß für 

80 Sick. 

DM 

39.- 

3 Box mit Schloß für 

80 Stck. 

DM 

43,- 

3,5"—Box mil Schieß lür 

50 Stck 

DM 

29 - 

5 1/4“—Sox ml Schloß lür 

60 Sick 

UM 

35 - 

5 1/4" - Box mil Schloß für 

Sonstiges: 

85 Sick (DX8J| 

UM 

27 50 

Rauchglasabdsckhaube aus Plexiglas 



1 Floppy 


OM 

1',50 

(ür CPC 464,654,0128 u Joyce je 

DM 

25 - 

Druckerständer (Plexiglas) 
Farbband 1 Panasonic 1080 . 

90,91 usw 

DM 

DM 

41- 

19,90 

Farbband 1 MIO 401 


DM 

I6,5ü 

Verlängerungskabe 1 464 


UM 

21,50 

Verlängemngskabel 1 664 +6128 

Joysticks: Compeilion 5000 micrc 

UM 

21 , 50 

UM 

35,- 

Monitorsländer (schwenkt kippoar) 

UM 

25,- 

Lightpen 1 464,664,6128 
(incl Sollware) 


DM 

91,- 

CPC Maus Pack 




(siehe Tesl CPC Magazin 10/86) 

DM 

218,- 

Versand :<si Nacfnah ne+Versandkoslerroder Verlasse 

(versandnoslerlrei) 

Händleranfrager’ .hm.I 1 ' 

Viele weitere Artikel von Schneider, Volex u sh aut An- 

'rage 




EDV - Zubehör- Großhandel 

Horst Effertz 
Gothe Straße 8a 



5012 Bedburg 



Tel.: 02272/1088 + 02274/5693 


JOYCE — SOFTWARE 


DENTAL - SOFT 
Die professionelle Software für alle 
zatotechnlsehe Labore. Abrechnung noch 
DEL. auton. Auoatsabrechnung, Lagerver- 
«1 tung,Technl kerr.tntlntlh nach Ibeatz. 
OwatzBtBt.lstlk Btt Jahresbilanz. Gut¬ 
schriften, Stornos, Kostenvoranschläge. 
Hit ausf. Handbuch. JOYCE u. JOYCE plus 

T>M SOS , — 


SCHREINER - SOFT 
ProgranmpacXet für Schreinereien alt 
Auftragsverwultung, Materialstaaa, Vnr- 
kulatlon, iachlralk. Bearbeitungsstufen. 
Freie Gestaltung von Rechnungen und 
Eostenvoranschlagen. Forkallculatlnn alt 
Jbiterlallieten, Zeitvorgaben z.B. einer 
koapl. Küche ln 10-20aln. Gleichzeitige 
Bearbeitung von 200 Auftragspoeitionen. 
4000 Materialposltiunen ln 20 Dateien. 
Mit Diskwechsel beliebig viele Vorkalh. 
speicherbar und Meuhalkulation nach an 
dein von Material, Magen u.s.v. Ein¬ 
fachste Bedienung durch Menuewlndnvn, 
Ausf. Handbuch mit ubungstoll nur für 
JOYCE plus -PCS 8512 

DM 1990,— 


FIBU - SOFT 

Klnanzbuchhaltung für kleine und aittl. 
Betriebe. 40 Konten, alt ünratzsfceuer- 
vnranarIdung, Bilanz. Ausf. Handb. für 
JOYCE und J0YCB plus. 

JDM 19S , — 


weitere 

Branchensoftware a,A, 
Händleranfragen erwünscht 
Infos anfordern 


alle Preise incl.Mwst. 
Versand Vorkasse oder 
NN + S 0M Versandkosten, 


Martin Kempenich 
Computer Hard- & Software 
ZetastraBe 13 
6220 Rüdesheim 4 


die ersten Ausdrucke auf je¬ 
den Fall auf solchem Recyc¬ 
ling-Papier vornehmen, da 
dieses überschüssige Farbe 
aufsaugt und größeren 
Schmierkram verhindert. 

Hans-Jürgen Zietz, 
Bad Bramstedt 

Statomat auf Disk 


dem Textverarbeitungspro¬ 
gramm Tasword. Ich selbst 
habe eine ursprünglich eng¬ 
lische Kassettenversion ins 
Deutsche übersetzt und mit 
zahlreichen Disketten- und 
anderen Funktionen erwei¬ 


tert. In meiner Tasword- 
Version ist es zum Beispiel 
möglich, verschiedene Tas- 
print-Schriften innerhalb 
eines Textes zu kombinieren 
oder auch eigene Zeichen zu 
entwerfen, die auf Bildschirm 


Tabelle 1 

Speicheraufteilung des Programms TASWORD Kaasettenverslon 


( alle Adressen sind hexadezimal !) 


Das Programm „Statomat 
II” war spitze. 

Da es jedoch für Kassetten- 
Benutzer geschrieben wurde, 
hier eine kleine Anpassung 
für die Benutzer einer Floppy. 
Der Lader wird in Zeile 200 
wie folgt abgeändert: 

200 TA G OFF:L 0 CA TE 
3,22:PRINT”wird gela¬ 
den....”:RUN”STATO. 
BAS” 

und mit SAVE ”STAT0- 
MAT.BAS" abgesaved. 

Das Hauptprogramm be¬ 
kommt nun den Namen 
STATO.BAS. 

Änderungen des Hauptpro¬ 
grammes siehe Listing 2. 

Nach diesen Änderungen ist 
das Programm voll Floppy- 
tauglich. Zu erwähnen wäre 
noch, daß alle Blanks aus 
optischen Gründen einzuhal¬ 
ten sind! 

Volker Kindler, 
Wuppertal-1 


Tasword 

In Ihrer Rubrik „Briefe” 
häufen sich in letzter Zeit 
Fragen und Anregungen zu 


Matrizen der Zeichen chr»(0) bis chr*<253> d.h. gesamter 
ASCIJ-Zeichensatz und zweiter Zeichensatz aus TASWORD. 
Folgendes Kommando macht diese sichtbar! 

FOR 1=8.3600 TO 8.4SFF:PRINT BIN* (PEEK CI), 8) :NEXT 
Die Zeichen 193 - 218 sind inverse GroBbuchstaben, die 

Zeichen 225 - 255 inverse Kleinbuchstaben. 


Für alle Zeichen (0 - 255) jeweils 3 bzw. 5 Bytes die beim 
Drucken des Zeichens an den Drucker gehen. Aufteilung nach 
folgender Tabelle: 

Zeichencode Bytes Zweck 


0 - 192 
219 - 224 
219 - 224 
225 - 230 
251 - 255 


3 Codesequenz beim Drucken des Zeichens 

3 Drucksteuerzeichen GroBbuchstaben 

3 Codesequenz beim Drucken des Zeichens 

5 Druckersteuerzeichen Kleinbuchstaben 

3 Codesequenz beim Drucken des Zeichens 


4941 


Sprungvektoren für verschiedene Routinen: 


4970 


4941 

4944 

4947 

494A 

4V4D 

4950 

4933 

4956 

4959 

495C 

495F 

4962 

4965 

49B6 

496B 

496E 


JP 4E29 
JP 4E18 
JP 4E2F 
JP 5498 
JP 5561 
JP 556F 
JP 557D 
JP 5589 
JP 5598 
JP 4ED2 
JP 5F8C 
JP 4B16 
JP 4B36 
JP 4B79 
JP 0000 
JP OOOO 


-> Kaltstart 
-> Warmstart 

-> Einsprung in Editor nach Suchen/Ersetzen 

-> Suchen/Ersetzen 

-> Kopzeile drucken 

-> FuBzeile drucken 

-> Textzeile drucken 

-> Leerzeile drucken 

-> 1. Textzeile der n-ten Seite suchen 
-> wird vor Text laden angesprungen 
-> Seitenzahl drucken 
-> Text raergen 
-> Text laden 
-> Text saven 
-> nicht benutzt 
-> nicht benutzt 


4971 

! Tabelle für Paramter Seiten1ayout, Drucken etc 

49C7 


49C8 

! Texte für Statuszeile und Meldungen wie z.B. beim Löschen des 

! gesamten Textes 

4B14 

4B16 

' Programm-Code 

67FF 
6800 

' Helpmenue seiten i-5 

7iAF 


71 BO 

! Alle Variablen wie Cursorzeile, Cursorspalte, 

! 7202 - 7281 enthält den Text der KopfZeile 

! 7208 - 7302 enthält den Text der FuBzeile 

7304 

7305 Beginn des Textspeichers 
Verwendung der Adresse 4B15 ist unbekannt. 


Listing 2 


640 LOCATE B,1B:PRINT"Disketten Menue" 

3B00 PEN 2 s QOSUB 5200sL0CATE 5,2sPRINT" Disketten 
“ Menue“sGOSUB 5210 


4010 

4020 

4030 

4040 

4080 

4090 

4270 

42B0 

4290 

4300 

4310 

4340 


PEN 1:LOCATE 9,12:PRINT"Diskette einlegen" 
LOCATE 9,14:INPUT“Dateinamenam* 
löschen 

PEN 2:LOCATE 9,lB:PRINT"Bitte üSpaceä drücken 
PEN 1:LOCATE 9,21:PRINT“Bitte etwas warten ... 
OPENOUT"!"+nam* 

PEN 2:LOCATE 9,11:INPUT"Dateiname : ",fi$ 

PEN 1:LOCATE 9,13:PRINT''Diskette einlegen" 

1öschen 


löschen 

PEN 2iLOCATE 9,19:PRINT*'Bitte ÜSpaceä drücken 
PEN 1:LOCATE 9,21:PRINT"Bitte etwas warten_ 


:LOCATE 5,3iPRINT 


I >1 
II 


8 CPC 12 '86 
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und Drucker ausgegeben 
werden. 

Vor all diesen Erweiterungen 
stand zunächst eine Analyse 
des Original-Programms. 
Ich habe die dabei gewon¬ 
nenen Informationen in nach¬ 
stehender Tabelle (siehe Ka¬ 
sten, Tabelle 1) aufgeführt. 
Alle Adressen sind hexade¬ 
zimal angegeben. 

Ich möchte Sie bitten, diese 
Liste zu veröffentlichen, da 
damit wohl einige Fragen 
geklärt und Anregungen ge¬ 
geben werden können. Man 
sollte das Rad nicht jedes¬ 
mal neu erfinden, sondern 
einen Informationsaustausch 
unter Anwendern fördern. 

Georg Trietsch, 
Karlsruhe 


lineare Regression 
und Korrelation 
Heft 9/86 

In diesem Programm von S. 
Jeske ist dem A utor wohl ein 
Fehler in der Programmge¬ 
staltung unterlaufen, der zu 
einer falschen Berechnung 
des Korrelationsfaktors r 
führt. 

Durch Einfügen der nach¬ 
stehenden Programmzeilen 
in das im Septemberheft ab¬ 
gedruckte Listing läßt sich 
der Fehler leicht beheben: 
515NEXT 
545 FOR i=l TO c 
575NEXT 
590 <Löschen> 

F. Jochem 


Diskmat 

Hiermit möchte ich Ihnen 
eine Änderung im Programm 
„Diskmat” mitteilen, die für 
Besitzer der Vortex-Speicher- 
erweiterung nützlich sein 
dürfte. 

Die Zeile 1820 muß lauten: 
1820FOR adr=&9E79 to 
&A1F8 Step 14 

Möchte man lieber den 
Auswahlbalken im Haupt- 
menue mit den Cursortasten 


steuern, so ergeben sich fol¬ 
gende Änderungen: 

740 t$=CHR$(24)+CHR$ 
(32)+ "WÄHLEN MIT 
COPY”+CHR$(240) 

+ ”-, COPY”+CHR% 
(241)+”- UND EN¬ 
TER-TASTE ”+CHR% 
(32)+CHR%(24) 
:GOSUB 500 
760 ta$=INKEYS:IF taS 
=CHR$(13) THEN800 
ELSE IF ta$=CHR$ 
(241) THEN 770ELSE 
IF ta$=CHR$(240) 
THEN 765 ELSE 760 

765 GOSUB 510:PRINT 
a$(v):v=v-2:IF v<0 
THEN v=9 

766 GOTO 780 

Dr. Wolfgang Kulesza, 
Lachendotf 


Wer kann helfen l 

Ich suche eine Druckeran¬ 
passung an das phantasti¬ 
sche Programm „Context” 
für den Drucker „Fastext 80” 
der Firma Smith-Corona. 
Aujterdem suche ich verzwei¬ 
felt ein Hardcopyprogramm 
für denselben Drucker. 
Vielleicht weiß einer Ihrer 
Leser Rat? 

Kliem Marian, 
Remscheid 

Vier Tips zum 
Assembler 


Tip Nr. 1: 

Die Verbesserung zum CPC 
International Z80-Assembler, 
aus dem Heft 3/86, „Auto- 
Number”, welches automa¬ 
tisch das REM-Zeichen “ ' “ 
ausgibt, funktioniert bei mir 
nicht. 

Auch nach mehrmaligem 
Ändern der Startadresse er¬ 
folgt jedesmal die Fehler¬ 
meldung "Unknown Kom- 
mand”. 

Aus diesem Grunde besann 
ich mich, um eine andere 
Lösung, die ich Ihnen hier 
vorstellen will, zu finden: 
Mit folgenden BASIC-Be- 
fehlen belege ich die kleine 
ENTER-Taste mit einem 


CR und dem REM-Zeichen 

KEY 141,CHR$(13)+CHR 
%(39):KE Y DEF 6,1,141. 
Nun braucht man beim Er¬ 
stellen von Sourcecode-Li- 
stings mit dem BASIC-Edi- 
tor nicht jedesmal das REM- 
Zeichen am Anfang einer 
neuen Zeile einzugeben, son¬ 
dern drückt anstelle der 
RETURN-Taste nur die 
ENTER-Taste, die beim 
CPC 6128 leicht zu erreichen 
ist. 

Diese Befehlsreihe habe ich 
an Zeile 10010 im CPC- 
Z80-Assembler angehängt. 
Zeile 10010 lautet nun: 
10010MEMORY &9FFF: 
MODE 2:INK 0,13: 
INK 1,0:BORDER 3: 
DEFINT a-r:z$=” ” 
.KEY 141,CHR%(13) 
+CHR%(39):KEY 
DEF 6,1,141 

Somit steht der komfortablen 
Sourcecode-Erzeugung mit 
dem BASIC-Editor nichts 
mehr im Wege. 

Tip Nr. 2: 

Deutsche Fehlermeldungen 
auch im CPC-Z80-.Assembler! 
Mit folgenden Änderungen 
im CPC-Assembler ist auch 
das möglich: 

11250 PRINTHa, ” fehlt”; 

:z%=” ".GOTO 11300 
11260 PRINT Ha, ”Syntax 
Fehler";:GOTO 11300 
112 70 PRINTHa, ’Distanz 
zu groß”;:GOTO 
11300 

11280 PRINTHa, ”Operand 
fehlt”;:GOTO 11300 
11290 PRINTHa, ”Unzu¬ 
lässiger A usdruck ’ 

Tip Nr. 3: 

Es störte mich immer, daß 
beim Listen von Source-Co¬ 
des mit dem CPC Internatio¬ 
nal Assembler die Labelta¬ 
belle nicht mit ausgegeben 
wurde. 

Dies kann man ändern, in¬ 
dem man die Zeilen 11410 
bis 11420 wie folgt ändert: 
11410 PRINTHa:PRINT#a, 
”Labeltabelle:” 
11420 FOR i=0 TO ltp-1: 
PRINT#a,HEX$ 
(wlt(i),4);”=”;lt%(i), 


Augen auf beim 
Computerkauf 


1996.- 

2499.- 

2496.- 

399. 


796. 


276, 

796,- 


söanosVoim 596 - 
soiange Vanal 1198,- 


soiange Vorral 948- 


1496. 

946,- 

1596. 


solange Vorral 


solange Vorral 546. 


1498 - 
£9B. 


856. 


496. 


2669 


3239 

423 


Die NEUEN ScDneidei PCs isui an Lager lieferbar 
PC 1512 Haufwerk Monochrom Bildschirm 
PC 1512 2 Laufwerke Monochrom Bildschirm 
PC15121 Laufwerk Color Maunoi 
PC1512 2 Laufwerke Color Monitor 
Schneider CPC 464 Keyboard solange Vorral 

Schneider CPC 664 Keyboard 
(iril Floppy) solange Vorral 

Schneider CPC 6126 KeyüoarC (mit Floppy) 

Schneider Grümnonilor GT 65 
(lür alle CPC) Sonderpreis 

Schneider Farbmonitor CTM 644 (lür alle CPC) 

Schneider CPC 464 
mit üniranrynlor 
Schneider CPC 464 
mit Farbmonitor CTIM 644 
Schneider CPC 664 
mit GrCinmonito' 

Schneider CPC 664 
mil Farbmonitor 

Schneider CPC 6126 mil GrCnmcmlor 
Schneider CPC 6128 mil Farbmonitor 
Schneider 3 Zok Floppy Disk 
DD11 

Schneider 3 Zoll Floppy Disk 

2 Laulwetk FD 1 Sonderpreis 556, 

Vorlex 5.25 Zoll Floppy-Disk 

F-l S Einlachslai mSonlr. 998,- 

Vorte* 5 25 Zoll Floppy Oisk 
F 1 0 DoppeiSBIIon m C<«l 
Vüitoi 525 Zoll Floppy OlSk 
F1 1 Einlacnsta. o Contr 
Vorte* A1 S 5 25 Zoll Aulnislkil 
F 1 S zur F 1 0 

Vorteil A l Z 5 25 Zoll Aulnislkil 
F1 Z zur F1 S 

NEU Voller M 1 S 3 5 Zoll Einfächslaüon 
ZW KB mil Csulr 

NEU Voder M 1 D 3 5 Zoll Uonpelslation 
I 4 MB mil Conlr 

NEU Vodex M1 X 3 5 Zoll Zweillaulwerk 
NEU Vodex F I X 5.25 Zoll Zweiüaulwerk 
NEU Vodex M1XRS 3 5 Zoll Zweillaufwwk 
mil RS 232 

NEU Vodex F 2 XRS 5 25 Zoll Zweillaulweik 
mil RS 232 

NEU Vodex M1Z3 5 Zoll Einfacbslalion 
ohne Gonlroller 

NEU Vodex AI S35 Zoll Aufrfclkil 
M 1 S zur MI D 

NEU Vodex A1 1 3.5 Zoll AulfUSlkll 
M1Z zur Ml D 

NEU Vodex WD 10 3 5 Zoll Winchesreisiation 
10 MS 

NEU Vodex WD 20 3 5 2oll Wincbesleislation 
20 Miß 

Cumana 3 Zoll Zwedlaulwerk ohne Controller 
Cumana 5 25 Zoll Zweitlaulwerk ohne Conlroller 
Achtung! B Ile gehen Sie uns unbedingt Ihren Compuleiiyp an 
Sie ersparen sich und uns unnötige Rückfragen!! 

Wichtiges Zubehör 
für Ihren CPC 

Daiemecorder Sony iril eingebautem Netzteil 

CPC 364Z6128 99 - 

3 Zoll Diskellen Panasonic / Maxell CF 2 5 Stück 55,— 

ab 10 SlJck je 10.50 ab IGO Slück je 10, 

3 5 Zoll Disketten Fuji 1 DD 10 Slück 79.00 

3 5 Zoll Diskerlen ku|i 2 CD 135 Ini 10 Stock 89.80 

5 25 Zoll Diskelten DS I OD 96 tpi empfohlen 
ICH sie Vodex Laulwerke 10 Slück in PVC Hadbox 69,95 
Nel 2 leil MP 1 für den Schneider CPC 464 139, 

Netzteil MP ? lür dis Schneider CPC 664(6128 159. 

Vodex VHP Modulator lur gestochene und 
scharfe Bilder 298, 

HAM Etweileiungen 0er Fa Vortex erhediiehe 
Preissenkung 1 a Cuallläl 

RAM Erweiterung SP 256 298,- 

RAM Erweiterung SP 512 

b lle immer Compuleriyp angeben 398,— 

RAM-Erweilemngssalz um 256 KSyle 98 — 

RAM-Eiweilerung lür Joyce aul 512 KByte 148.- 

Bildschirmlltor lür GT 64165 58,- 

Bildschiimliller lür Farbmonitor C1M 644 68, 

Monitor Drehfuß. 

Neigungswinkel slulenlos einstellbar 39,95 

Veilangemngskabel 1 5 Meier für CPC 464 29,95 

ditn lür CPC 66416126 34,95 

Slauöschutzhauben aus weichem Kunstleder 
{Schneiderniau) 

lur Keyboa’c 4641664/6126, NLQ 401. DD11 

Monitor Grun/Faibe |e 17,95 

Schulzhaubcn lür Vodex 

F1 S / F1 D. F l XIM1 X le 19,95 

Ducker Panasonic 1060/90/91/92, DMP 2000 |e 19.95 

Schulzhaube Rauchglas liir Konsole 
CPC 464/664/612B je 24,95 

RS 232 C serielle SchnitlSlellB CPC 4641664 148, 

Akustikkoppler Dataphon S 21 d 249,— 

Grafpad II für CPC 464/664 
1280 x 1024 Bildpunkle DIN A4 
für CPC 464/664 278, für CPC 6128 298,- 

AMX Maos mit Software und deuiscnem Handbuch 248,- 
Formularliaklor zu Diuckci NI Q 401 79.95 

Joyslick Quickshol II mit Aulcfire 19.95 

Competilion Pro 5000 mil Mikroschaller 49,95 

Joystick Ananto: zum Anschluß von 2 Slück Joysticks 24,95 
Biskettenbox 40 St 3 bzw 3.5 Zoll Disketten 
1 a Gualilal 39.95 

wie oben, jedoch lür 40 Sl 5 25 Zoll Disketlen 49,95 
Diskellenbox für ICO Sl 5 25 Zoll Diskellen 
mil Schleift 34,95 

Alle Gerale mil FTZ und deutschem Hausbuch. Technische 
Unledagen je Gerät gegen 1 50 DM in Brielmarken 
Fxpressversand speziell in die Schweiz und nach Österreich, cm 
fachsle Abwicklung der Bezahlung Besuchen Sie uns mal in Ra 
vensburg telelonische Anmeldung i nedäßl ch 


Geschäftszeiten Montag bis Tie tag von 9 Di 12 00 imd vor 

14 00 ISODMiltwochnacInmltag gescWcssen 1 
Samslag 8 01) - 13 00 kein langer Samstag 
Sie linden uns im Schuhhaus Mayer im 2 Stock 


Bachslr 52, D-7980 Ravensburg, 
Telefon 0751 / 26 1 38 
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THE MIRAGE 1MAGER 

Für CPC 464 664 6128 

Nur Steckmodul mit durchgeführter' Port, kei 
ne weitere Software Einfachste Handhabung, 
umfangreiche Menuesteuerung, kopiert auf 
Disko Tape per Knopfdruck Erfrieren von 
Spielen, abspeichern, später weilerspielen! 
Intern 8K Rom und 8K Ram Geringer Platz- 
bedarf - komprimiert Spiele auf Disk o 
Tape! Tape Save fast o slow Ohne Diskinler 
face zu verwenden (464) Ist nur für Software- 
Besitzer zur einfacheren und schnelleren 
Handhabung ihrer Programme 
Modul und Anleitung DM 198,— 


Computer Hits (10 Spiele) Kass 29,90 


Galvan 

29,90 


Revolution 

30,-/ 

47,90 

Impossible Mission 

44,90 


Red Arrows (Sonderposten) 

39,- 

Trail Blazer 

29,90/ 

39,90 

Temnssl 

30,-/ 

49.- 

Street Hatvk 

29,90 


Tne Activalors 

29,95/ 

49,95 

Nexor 

29,90 


Tire Fidolon 

39,95/ 

59,95 

The Trap Door 

24,90 


Glider Rider 

27,90 


Dar Dare 

39,95/ 

59,90 

Eile Asrde Soccer 

16,- 


Prodiuy 

39,90/ 

59,90 

Xarq 

39,90/ 

59.90 

Eyespy, Spylrack 

ie 10 ,- 



NEU: Schneider PC jetzt lieferbar! 
Bitte um Anrul 


Elektronik Center 
Wachterstraße 3 
8170 Bad Tölz 
Tel.: 08041/41565 

Lieferung per NN (+Porto) oder 
V Scheck (Versandfrei) 


Philosoft® 


* TEXTVERARBEITUNG * 



96 Kommandos: Blockbefehle, 
Absatz/Seitenumbruch, Such¬ 
en/Ersetzen, Druckeranpas¬ 
sung, perfekt, superschnell! 

* KOMMUNIKATION * 

Mailboxbetrieb, Textspeicher 
Senden und Empfangen mit und 
ohne Prüfprotokoll (M0DEM7 
und XMODEM kompatibel!) 

* ASSEMBLER * 

sehr schneller Assembler für 
Z80, 8080, 8085 und 8048 (!) 
Opcodes, 26 Pseudo-Opcodes, 
if/else, dseg/cseg, rept... 

* Z80-TESTER * 

symbolischer Tester mit 26 
Funktionen incl. Multi-BP, 
Datentransfer, EP ROM progr.l 

AUF EINER KARTE: 

32k Software im EPROM (nur 
24 Byte RAM weniger!), Pro¬ 
grammiergerät (bis 27256) 
und RS232-Schnittstelle: 

Grundausbau 278,— 

Option EPROM-Progr. 119,— 

Option RS232 119,— 

Philosoft 

Pariser Platz 2 
8000 München 80 


:NEXT:IF a—8 
THEN PRINT#a 

Tip Nr. 4: 

Bei der Abspeicherung auf 
Diskette sind pro Dateiname 
nur acht Zeichen für den 
Namen und drei Zeichen für 
die Extension erlaubt. 

Will man nun beim Abspei- 
ehern z.B. eines Source-Li- 
stings auf Diskette alle acht 
Zeichen als Namen benut¬ 
zen, so wird dies mit einer 
Fehlermeldung quittiert. 
Dies beruht auf der Tatsa¬ 
che, daß der CPC-Assembler 
selbst noch an den Datei¬ 
namen (der jetzt nur fünf 
Zeichen lang sein darf) selbst 
noch ein ”-qc”, "-bl" bzw. 
"-oc" anhängt. 

Nach folgenden Ergänzun¬ 
gen kann der Dateiname bis 
zu acht Zeichen lang sein, 
da die Ergänzungen "qc”, 
”.oc" bzw. ”.bl” nun als 
Extension angefügt werden, 
also "Name.qc” anstatt 
”Name-qc. 

11470IF a$=”o" THEN 
SAVE na%-\-".oc”,B 
,zps-dadr,zpc-zps: 
GOTO 11450 
11480IF a$=”q” THEN 
POKE qpc,0:SAVE 
naS+qc ”,A:POKE 
qpc,lz:GOTO 11450 
11520 OPENOUT na$+ 
"bl” 

Jonny Rauscher, 
Saal/Donau 

Frau 

Nachdem ich schon sehr 
lange die Leserin Ihrer Zeit¬ 
schrift bin, möchte ich mich 
heute erstmals auch schrift¬ 
lich an Sie wenden. Der 
Grund hierfür ist ein Pro¬ 
blem, welches mich schon 
sehr lange beschäftigt und 
vielleicht eine Anregung für 
Sie sein könnte, sich einmal 
mit dieser Thematik zu be¬ 
schäftigen. 

Es geht schlicht und einfach 
um die weiblichen Compu¬ 
terfreaks. 

Meine Erfahrungen sind so 
frustrierend und entmutigend, 


daß ich einfach an Sie schrei¬ 
ben mußte. 

Kurz etwas über mich: ich bin 
26 Jahre alt und gelernte 
Anwaltsgehilfin, seit der Ge¬ 
burt meines ältesten Sohnes 
aber nur noch Hausfrau. Ich 
lerne außerordentlich gerne 
und bin auch technisch nicht 
unbegabt. 

Vor etwa einem halben Jahr 
packte mich dann der Haus¬ 
frauenfrust und ich beschloß, 
ernsthaft etwas zu unterneh¬ 
men. Da mich Computer 
schon sehr lange beschäftigten 
(Ihre Zeitschrift hatte ich von 
der ersten Ausgabe an schon 
gekauft, obwohl ich noch 
keinen Computer hatte) und 
der Schneider besonders, 
kaufte ich mir den 664, eben¬ 
so den C-16 und einen DMP 
2000. Mit einer wahren Be¬ 
sessenheit, die bis heute an¬ 
hält, stürzte ich mich dann 
auf meine „Compis". Doch 
da ich mir alles selber aneig¬ 
nen muß, wollte ich Kontakt 
zu anderen Computerfreaks 
aufnehmen. Und hier begann 
dann das Übel; auf Inserate 
hin setzte ich mich mit allen 
in Frage kommenden Leuten 
in Verbindung. Sobald diese 
aber meine Stimme hörten 
(ausnahmslos alle Leute!!!) 
wurde man aber schon merk¬ 
lich zurückhaltend. 

Obwohl ich grundsätzlich die 
Jungs duzte, wurde ich stur 
gesiezt. Ein fachliches Ge¬ 
spräch kam erst recht nicht 
zustande. Ich wurde dann 
mit den merkwürdigsten Be¬ 
gründungen abgewiesen, wie 
z.B. derjenige hatte einen 464 
und somit kam ich mit mei¬ 
nem 664 nicht in Frage. 

Mein Ein wand, ich hätte ge¬ 
nügend Kassetten zum Tausch, 
da ich auch einen zusätzli¬ 
chen Recorder besitze, wurde 
wegen „zu großer Umständ¬ 
lichkeit” zurückgewiesen. 
Da ich mich aber nicht so 
schnell unterkriegen lasse, 
versuchte ich es auf andere 
Weise: ich annoncierte selber 
in z wei Zeitschriften, welche 
eine spezielle Rubrik für 
Computer anboten und wegen 


der kostenlosen Inserate auch 
gut genutzt wurden. Einige 
Anrufer legten sofort wieder 
auf, andere blockten ab. 

Ein Typ war dabei, der nach 
merklichem Zögern sich 
mehrmals vergewisserte, ob 
er bei mir auch wirklich rich¬ 
tig sei, und nicht doch mein 
Mann der Ansprechpartner 
sei. Ich konnte ihn in dem 
Gespräch dann wenigstens 
dazu bringen, daß man es auf 
einen Versuch ankommen 
lassen sollte. Als er einige 
Tage später dann wirklich 
kam, hielt er sich nur an 
meinen Mann, obwohl der 
nur wenig Ahnung vom Com¬ 
puter hat. 

Ich mußte tatsächlich erst 
meine „Fähigkeiten” unter 
Beweisstellen, bevor er mich 
einigermaßen anerkannte. 
Das nächste Telefonat verlief 
noch etwas unbehaglich, 
doch jetzt verstehen wir uns 
bestens und es besteht ein re¬ 
ger Kontakt. Dieser Typ war 
übrigens der einzige, der als 
Erfolg auf meine Annoncen 
bezeichnet werden kann. 
Weitere Kontakte kamen 
nicht zustande. 

Ich habe jetzt auch Kontakt 
zu einem Club in Hamburg. 
Dort ist man mir gegenüber 
auch sehr komisch eingestellt 
und ich weiß schon jetzt, daß 
ich mit Fragen dort nicht an¬ 
kommen darf. Was bei an¬ 
deren Mitgliedern vielleicht 
selbstverständlich ist, wird 
bei mir mit „typisch Frau, 
keine Ahnung” kommentiert 
werden. Ich werde ja schon 
froh sein, wenn mir der ver¬ 
sprochene Aufnahmeantrag 
auch wirklich vorliegt und ich 
dann vielleicht an einige 
Programme herankomme. 

Ich bin nun wirklich keine 
„Emanze” und die Probleme 
von Männlein oder Weiblein 
haben mich bisher noch nicht 
übermäßig beschäftigt. Doch 
nun packt mich die kalte 
Wut!! Warum zum Teufel ist 
es nicht möglich, daß man als 
Frau auch ein Computerfan 
sein kann und als solcher 
auch akzeptiert wird??? Ich 
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erwarte nun wirklich keine 
Wunder, doch etwas mehr 
Toleranz und Entgegenkom¬ 
men wären wirklich wün¬ 
schenswert. Vielleicht wird 
dieses Thema ja einmal von 
Eurer Zeitschrift aufgegrif¬ 
fen. Ich würde mich darüber 
freuen, denn ich vermute, 
daß ich nicht die einzige 
weibliche Computerverrrück- 
te bin, die diese Probleme 
hat. Mein Ziel ist mit Sicher¬ 
heit kein reiner „Frauen¬ 
club”, doch vielleicht ist dies 
dann die einzige Lösung, 
damit man bei ganz norma¬ 
len Problemen nicht gleich 
ausgelacht bzw. ignoriert 
wird. 

In der Hoffnung, mit diesem 
Brief etwas „angeleiert” zu 
haben, verbleibe ich als treue 
Leserin 

Marina Mahnke, 
Hamburg 


CPC: 

Berechtigter Vorwurf oder 
schlechte Einzelerfahrung? 
CPC International fordert 
Mann/Frau hiermit auf, zu 
obigem Brief Stellung zu 
beziehen oder über ähnliche 
Erfahrungen zu berichten. 
Wenn niemand antwortet, 
schreiben wir ,Alles was 
Männern Spaß macht” auf 
unser Titelbild, werden das 
führende Herrenmagazin 
und verlangen 12,- DM pro 
Heft. 

Also, überlegt’s Euch! 


Reversl 

Nach der Veröffentlichung 
meines Programmes „Rever- 
si” in der Ausgabe 11/86 


Ihrer Zeitschrift, erreichte 
mich ein Anruf, der mich auf 
einen Fehler in diesem Pro¬ 
gramm aufmerksam machte. 
Dieser Fehler tritt nur bei 
den Modellen CPC 664 und 
CPC 6128 auf, da bei diesen 
Computern die Variable 
CURSOR% als Befehl inter¬ 
pretiert wird. 

Um das Programm auch auf 
den anderen Modellen lauf¬ 
fähigzu machen, muß in den 
Zeilen 690, 1170, 1290 und 
1890 CURSORS durch 
CSRS ersetzt werden. 

Armin Rudert, 
Essen 


Mehr ModesS 

Zur Ergänzung des Briefes 
von Herrn Thomas Bruhns 
im Novemberheft der CPC 
International (Rubrik Brie¬ 
fe) verweise ich nach einem 
Beitrag von mir im Sonder¬ 
heft „Klar sehen beim Schnei¬ 
der CPC - Teil 1” der 
„ComputerSchau es ist tat¬ 
sächlich möglich, die drei 
Modi gleichzeitig auf den 
Bildschirm zu bringen. 

Späterhin habe ich noch ei¬ 
nige weitere Möglichkeiten 
entdeckt: im Mode 1 stehen 
drei und im Mode 0 sogar 
sieben verschiedene Schrift¬ 
arten zur Verfügung! Leider 
muß ich aber hinzufügen, 
daß dies nur für den CPC 464 
gilt. 

Versuchen Sie doch mal 
dieses kurze Demoprogramm 

Zum Schluß möchte ich noch 
hinzufügen, daß ich Ihre 
Zeitschrift erst seit Anfang 
dieses Jahres kenne, aber 
seit dem kein einziges Heft 
verpaßt habe. 


Die Serie „Der gläserne 
CPC” war Spitzenklasse! 
Macht so weiter! 

Anton van den Broek, 
Brüssel 


Referenz 

Ich habe ein kleines Pro¬ 
blem: Für meinen CPC 464 
bräuchte ich eine Referenz¬ 
karte über Calls & Pokes, 
wobei ich das Registerver¬ 
halten für alle möglichen 
”CALL ’s ” benötige. 
z.B. Call HBBC9: 

Einsprung 

DE=X-Koord. 

HL^Y-Koord. 

Aussprung 

AF, BC, DE, HL zerstört. 

Bitte übermitteln Sie mir eine 
Bezugsmöglichkeit (z.B. 
Buch). 

CPC: 

Am besten informiert Sie 
das Firmwarehandbuch 
CPC 464, welches Sie direkt 
von Schneider unter der 
Bestellnummer: Soft 258 
beziehen können. 


Brief von der Insel 

Ihopeyou will excuse me for 
writing to you in English, 
but I am an Irishman, and 
although I have lived in 
Deutschland nineyears now 
andlcan read Deutsch quite 
well, I never did leam to 
write it so good, (Meine 
Deutsche Grammatik ist 
ganz schlecht). So I think it 
is better if I write in English 
to avoid any misunderstan- 
dings. I am sure that as you 
are with Schneider INTER¬ 


IM •- MULTIMODE DEMO 

20 '- (c)1986 A.v.d.B. 

30 ’ 


40 MODE 2:s$="SCHNEIDER CPC":POKE &B1C8,1:rat=4:FOR x=l TO 3 
50 READ mask:GOSUB 100:PRINT TAB(x*6)s$:PRINT:NEXT 
60 GOSUB 90:LOCATE 1,8:POKE &B1C8,0:rate=16:FOR x=l TO 7 
70 READ mask:GOSUB 100:PRINT TAB(x)s$:PRINT:NEXT 
80 GOSUB 90:PRINT:PRINT"* MULTIMODE Demo *":END 
90 mask=&80:rate=2:POKE &B1C8,2 

100 FOR n=&BlCF TO &BlD2:POKE n.mask:mask=mask/rate:NEXT:RETURN 
110 DATA &40,&C0,&D0,&A0,&20,&90,&30,&70,&F0,&F4 



elektro GmbH 


Delsterner Straße 23 
5800 Hagen 1 
Telefon 0 23 31 / 7 26 08 


An Advents-Samstagen hat unser Geschäft 
bis 17.00 Uhr geöffnet. 

• NEU • NEU • NEU • NEU • 


Computer 24 Monate mieten statt kauten. 
Jetzt kaufen und in 6 Monaten bezahlen 


Schneider PC 1512 

Monochrome) 

Einzellaulwerk 


Mietpreis 92 - OM 
Kaufpreis 
1999 OM 


Schneider PC 1512 
Monochrome) 
Doppellaut« erk 
Schneider PC 1512 
Farbmonitor) 
Elnzellaulwerk 


Mielpreis 117,- DM 

Kaufpreis 
2*99. DM 


Schneider PC 1512 
Farbmonitor) 

Oop pellaulwerk 


MlelpreH 141,-DM 
Kaufpreis 
2999 -DM 


Schneider PC 1512 
Monochrome) 
Festplalle 10 MB 


Mlelpren 165.— OM 

Kaufpreis 
3499. OM 


Schneider PC 1512 
Monochrome) 
Feslpleile 20 MB 
Schneider PC 1512 
Farbmonilor) 
Feslplslle 10 MB 


Mietpreis 190,-OM 
Kaufpreis 
3999 OM 


Schneider PC 1512 Mietpreis 210 DM 

FarbmonilDrlFesIplalte Kaufpreis 


20 MB 

Schneider CPC 6128 
Monochrome 

Schneider CPC 6128 
Farbmonilor 

Schneider Joyce 

Schneider Joyce Pius 


«99 - DM 


Mietpreis 4 4.-OM 
Kaufpreis 
975.- OM 


Mietpreis 73,-OM 
Kaufpreis 
1599 - DM 


Mietpreis 79,-OM 
Kaufpreis 
1625,- OM 


Mietpreis 107-0111 
Kaufpreis 
2275.- DM 


Zweillaufwerk FD 2 lui Joyce 

648.- 

OM 

Ham Erweiterung lur Joyce 

119 

OM 

Aulrüslkil Joyce komplett 

729 - 

OM 

Schneider Grtmmonilor GT 65 SONDERPREIS 

275.- 

-DM 

Schneicer Farnnronilor CTM 664 SONOEBPBEIS 

675.- 

-DM 


PC-S oftware 


Software für den Architekten 


linnoraatnDehnung 599.- OM 

Baukwiw ■ ffeonnkotten 599 - OM 

Lr '.fi/igvsrrechniise 599, - OM 

alle n>:: Fatale zusammen '499 OM 

Vldeotfi ekenuerwaltuno 570,- OM 

Fahrschuhiurwaliung 570,— DM 

Kassenbuch 98,— OM 

ACiessveiwallung 9B,— DM 

V.deolhekenveiwikung II 1750,— DM 

frUu 1750,- DM 

Handweikspiogramm 1750.— OM 

Handel tWarenwirlschafl) 1750.— DM 

Teulprogiamm mH Kundendatei 675,— OM 


weitere Sollware au sein günstigen Preisen in VorOereilung 


Ständig die neuesten Spiele und Anwendet 
Programme für Schneider CPC lieferbar! 


KiUlog gegen Qüclyoilo <1,^ DM in Briefmarken/. Sämtliche 
belerungen erfolgen ng! Porto * Verpackung 


' 
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Supers oftware 
für Ihren CPC 


Turbo Pasca: in Gralik 205. 


9 Ni 1 I 
CrwäcnSt* 
SW Mor 
Marne SW 


198 — 
siehe 49,90 
auch ?9,9D 
Anzeige 79,90 


D-sksort SW Slar 49.90 
Da» Slar Oivision98,- 


Si»; lic Slar 
Cainiicaei Slar 
Slan u d Zaubeistab 
Slar Games I 
Desuner Slar 
Turbo Toolbox 
Pascal MT* 

Small C 
Slar Texlei 
Para 

woOiswne 
DR GRAPH 
DR DRAW 
ßu»rte Maslor 
Turbo Aflress 


79.90 
98, 

39.90 
39,30 

39.90 
225,- 
•69.— 
148,- 
85,— 
58. 
75- 
199,— 
199 - 
89- 
'49- 


Turbo Pascal o Gr 
Prolimal 
Oalamal 
fexlcmal 
Profi Painlsr 
Bjdget Manager 
Malhemal 
Copy Slar II 
Fibu Star Plus 
Pyramide 
Puzzle 
Turbo Tulor 
Turbo Graphics Toolbox 225,- 
Turbo Lader Business 148,- 
C Basic Compiler 169,— 
Slar Dalei 85- 

CPC Assembler Kurs Kass 64,- 
Mulliplan 199 — 

dBase II 199,— 

Wordstar 183- 

Mlca CAD Programm 198, 


225 
39- 
99- 
99- 
99,- 
39- 
99- 
39,90 
298 - 
39,9C 
39,90 
39, 


wertere Proiramme Imdm Se in insmt Software Ute CPC. de 
«vir Innen gerne zusercen. Gebühr i 50 DM in Briefmarken 

Rund um den Joyce 

Schneider PC'.V 8256 Joyce 1648 — 

Schneioer PCW 8512 Joyce plus 

: L...v.-r. ; , 

3 Zoll Disketten CF 2 DD 

für Zweillaulv/erx Joyce 5 Stück 98.- 

FD 2 (2 Laulwerk lür Joyce 1 MB) 698.— 

RAM Erweilerungssalz um 256 KByte 148.— 

BrtJMhnmliiier iüi Joyce i Joyce pte 89.- 

Paralei und serielle Sctwiltslelte '4B- 

Farüband lür Drucker Joyce 24.95 

Gralpaa 3 professionelles CAD Syslem lür 
Joice PCW 3256 und PCW 8512 kompiel! mit Software 
una Handbuch 549 — 

Joyce Schreib Praxis Pakei siehe DMV Verlag 89 - 

Mica CAO Programm 

Joyce !9e- 

oBaseii 199,- 

Vewnjver» altung Joyw 248, - 

Wordstar 199,- 

TirtoAdressJoya 149,- 

»WKMn 199.- 

TiPbcPascal ohne Grallk 225,- 

OH GÄAPH 199 

FIBU St«' Plus 296.- 

OR OWW 199,- 

■toyt* System 189, 

StarMWtf 20 98,- 

OüeiSar 98- 

StarBss* 198,- 

Businesi Star 298.- 

StaüStc SUr 98- 

Aiftragsbeartxeeung 448 - 

Adressvemallang 128,— 

Joyce lur Emstogf 29 - 

Das große Joyce Buch 59 — 

Scnachprogramm 3D Clock Chess 69.95 

weitere ’rogramne linden Sie in unserer Liste Joyce, die wi Ihnen 
gerne tosenden, Gebühr 150 in Briefmarken 

Druckerpa rade 


Epson IX 80 100 Zeichen I Sekunde 

Epson FX 85 160 Zeichen f Sekunde 

Eoson FX 105 160 Zeichen f Sekunde Breil 
EosonLQBüO 200 Zeichen / Sekunde 24 Nadeln 
Epson Lü 1000 300 Zeichen I Sekunde 24 Nadeln 
Epson Hl 80 4 Färb Plolter 

Panasonic 1000 100 Zeichen I Sekunde 
Panasonic 10S i 120 Zeichen l Sekunde 
Panasonic 1092 130 Zeichen I Sekunde 
Panasonic 1592 130 Zeichen I Sekunde Breil 
Panasonic 1595 240 Zeichen f Sekunde Breil 
Panasonic 3151 TypenraOdrucker 

Okrmaie 20 Farbplotter 
Okidala ML 182 120 Zeichen / Sekunde 
Okidala ML 192 160 Zeichen / Sekunde 
Okioalü ML 193 160 Zeichen 1 Sekunde Breil 
Okidala Eirizelblaileinzu« lür ML 182IM1192 
NEC P 6 200 Zeichen r Sekunde absulule Sollte 
NECF 7 200 Zeichen! Sekunde Brei 

Slar NL10 120 Zeichen I Sekunde 

Slai NG 10 120 Zeichen I Sekunde 

Slar SG 15 120 Zeichen / Sekunde Breil 

Einzelblalieinzug NL10/NG10 
Schneider DMP 2000 Lieferzeit a A 
RilemanFt 105 Zeichen / Sekunde 

DrucMmscftlUTkaoel CPC 464IE&! 
edo CPC 6128 hochwertiges Rundkabel gsschirml 
Diuckerslanber. 1 a Oualilat Mullilorm 
Endlospapier weil! Mikropeilorahon 300 BMI 

dilo 1000 BMI 

2000 Blatt 


1246, 

1698, 

1698. 

2198, 

1298, 

698, 

849, 

1098, 

1598, 

199B, 

1398, 

749.- 
798.- 
1290, 
1498. 
449. 
1649, 
2198. 
898, 
B9B, 
1246 - 
259 - 


49.95 
5996 
98. 

19.95 

34.95 

49.95 


crsaizlaibbänder für alle Drxker ab Lager lieferbar 

Alle Geräte mtl FTZ und deulscliem Handbuch Technische 

Unterlagen ie Gerat gegen 150 DM in Brielmarken 

ExcressveisanO speziell in die Schweiz und nach Östeneich, 

einlachsle Abwicklung der Bezahlung 

Besuchen Sie uns mal in Ravensburg, letelonische Anmeldung 

unerläßlich' 

Versancoec rgung innerhalh der BRD 

per Nachnahme zuzüglich Podo 

Geschäftszeiten. Monlag bis Freilag von 9 DO 12 00 und von 

14.00 18.00 Millwochnachmillag geschlossen! 

Samstag 8.09 '3.00 kein langer Samstag 
Sie linden nns im Schuhhaus Mayer im 2 Stack: 
Bachstr. 52. D-7980 Ravensburg, 
Telefon 0751 / 26 136 


I ,i ir>5i ii.'. 1 .-Li«J 


NATIONAL, thatyou will be 
able to read English very 
well. 

Ihavea Joyce, aPCW8512, 
and I read Schneider Inter¬ 
national and Schneider Ma¬ 
gazine, and some English 
magazines also, though actu- 
aly there is not very much in 
them for Joyce: Mostly it is 
the CPCs which are catered 
for. I am hoping of course 
that this Situation will im- 
prove and there will be more 
programs for Joyce soon. 

I have bought the S.I. Son¬ 
derheft 3/86 and was very 
pleased to find the article 
3D-Grafik with LOGO and 
will be trying it out on my ma¬ 
chine. Thankyou for that. 

I was also interested in the 
Emulator Programm for 
CPCs on page 97, and it 
made me wish fora Programm 
to convert or emulate CPC 
Programms for Joyce. I am 
not at all experianced with 
Computers and I don ’t realy 
understand the difficulties, 
or why there should be diffi¬ 
culties between the various 
Schneider machines. Is there 
any possible way to convert 
Programms? 

I am very interested in the 
'Hubschrauber Simulator 
Programm, and wonder if it 
could be written for Joyce 
too? I am interested in any 
Flying Simulator. Und von 
'Der Herr der Ringe ’ bin ich 
begeistert. 

The ’Schnittstelle RS232 
Selbstbau’seems to only for 
CPC also, but I realy would 
like to build onefor my ma¬ 
chine, I hear though that the 
nextElector Sonderheft is to 
have one in, so maybeIshall 
need to waitfor that. 

I realy think your magazi¬ 
nes are very good, and I do 
not like to complain, but Ido 
hope you will help poor 
Joyce a bit more. It may be 
better if there were a special 
magazine for Joyce and the 
new Schneider PC as there 
now is in England, the 'Put- 


ting your Amstrad to work' 
from the Publishers of’Your 
Computer'. 

David Rogers, 
Kiel 

Wußten Sie schon? 

Angeln Sie sich einen Fisch 
mit dem Computer! In den 
USA gibt es einen neuarti¬ 
gen Fischköder, der von 
einem Mikroprozessor ge¬ 
steuert wird. Der Köder 
kann bis zu 16 verschiede¬ 
ne Fliegenarten imitieren, 
sowie zittern und zappeln. 

Wußten Sie schon? 

Der schwerste Computer 
der Welt ist der IBM FSQ-7. 
Er wiegt satte 300 Tonnen! 

REAL-Zahl 
mit Turbo-Pascal 

Ich habe mir vor kurzem 
Turbo-Pascal für meinen 
CPC 464gekauft und mußte 
jetzt feststellen, daß ich keine 
REAL-Zahlen darstellen 
kann. Wenn ich das Pro¬ 
gramm 

Programm test; 
var 

summe: real; 
begin 

summe33000; 
write (summe); 

end. 

compilieren will, kommt die 
Fehlermeldung ”Fehler in 
Integer-Konstante” und der 
Cursor bleibt auf der 33000 
stehen. Wenn ich die Zu¬ 
ordnungszeile summe:— 
33000; ersetze durch die 
Anweisung: 

summe := 33*1000; 

gibt er nach Compilieren 
und "run” -3.2536000000E 
+04 aus; auch hier wird 
"summe" also als integer 
aufgefaßt. 

Meine Fragen lauten also: 

-Habe ich im Programm 
was falsch gemacht? 


-Liegt das Ganze an mei¬ 
nem Rechner? 

- Liegt das Ganze an meiner 
Version von Turbo-Pascal? 
-Liegt das an Turbo-Pascal 
für den Schneider? 

Harald Baumgart, 
Uetersen 

CPC* 

Sie haben in Ihrem Pro¬ 
gramm den Fehler began¬ 
gen, einer REAL-Variablen 
eine INTEGER-Konstante 
zuzuweisen: Eine in Pascal 
verwendete reelle Zahl muß 
mit einem Dezimalpunkt 
und mindestens je einer 
Ziffer rechts und links da¬ 
von geschrieben sein. So¬ 
mit sind z.B. folgende Zu¬ 
weisungen erlaubt: 

a:=-f 12.0; 
a:=-12.1; 
a:= 3.1415; 

Dagegen sind die folgenden 
Zuweisungen nicht erlaubt: 

a:= .123; 

a:= 1. 

a:=12; 

Wenn Sie nun aber einer 
REAL-Variablen einen 
Wert zuweisen wollen, der 
errechnet werden soll, so 
sollten eventuell in der 
Berechnung benutzte Kon¬ 
stanten auch vom oben be¬ 
schriebenen REAL-Typ sein, 
da sonst Rechenfehler auf- 
treten können. Soll eine 
REAL-Zahl in einem be¬ 
stimmten Format angezeigt 
werden, so muß dem Namen 
der REAL-Zahl ein Dop¬ 
pelpunkt, die Anzahl der 
Vorkommastellen, ein wei¬ 
terer Doppelpunkt und die 
Anzahl der Nachkomma¬ 
stellen folgen. 

a:= 12345.6789; 
writeln(a:5:4); 

Diese Befehlsfolge läßt fol¬ 
gende Ausgabe am Bild¬ 
schirm erscheinen: 
12345.6789 

Wir hoffen, daß damit Ihre 
Fragen beantwortet sind. 
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Schneider Aktuell—i 


Amstrad in China 

Überrascht waren wir dann 
doch, als wir einen Zei¬ 
tungsausschnitt der Beijing 
Wanbao vom 16.8.1986 zu 
sehen bekamen. Auf einer 
Verkaufsausstellung der 
Shenzhen Huaming Com¬ 
puter GmbH in Beijing gab 
es folgendes Angebot für 
Lehrinstitute: 

Microcomputer für Ausbil¬ 
dungszwecke CPC 464 mit 
64 K RAM, 32K ROM, Ta¬ 
statur in Standardgröße, 
Kassettenrekorder unter Pro¬ 
grammkontrolle, Schnitt¬ 
stelle für Lichtgriffel u.a. 
Peripherie. 

1650 Yuan (Grünmonitor) 
2250 Yuan (Farbmonitor) 

Festplatte 
für Joyce 

Ein Winchester-Festplatten- 
system mit Konsole wird ab 
Ende dieses Jahres von der 
Fa. Werder vertrieben. Das 
System arbeitet auf CP/M 
plus und ist zu LocoScript 
voll kompatibel. 

Die WEB-Festplatte hat eine 
Kapazität von 20 MB, der 
Preis wird voraussichtlich 
zwischen DM 2500 - 3000 
liegen. 

Zur Zeit wird die Software 
aus dem Hause Werder, z.B. 
das Programm Quick-Data, 
für einen Festplatteneinsatz 
umgeschrieben. 

Info: Werder 
Nachrichtentechnik 
2000 Hamburg 71 □ 

Vortex- 

Abdeckhauben 

Weiteres Zubehör für 
Schneider- und Vortex-Hard- 
ware kommt nun in Form 
von Abdeckhauben. 

Die Schutzhauben sind da¬ 
mit erstmals auch für Vor- 
tex-Produkte (Fl-X, Fl-s, 
Fl-D und WD-20) erhält¬ 
lich. Der Preis liegt bei ca. 
DM 19,80. 

Vortex hat als neuestes Zu¬ 
behör auch selbstklebende 
Kabelschellen im Angebot, 
die in verschiedenen Farben 


lieferbar sind und Schluß 
mit dem Kabelsalat machen 
sollen. Ein Paket Kabel¬ 
schellen (16 Stück) kostet 
etwa DM 8,90. 

Info: Vortex 

7101 Hein □ 

Kauf auf Raten 
für Schneider PC 


^ VOGEL 

Computer* 

bücher 


Den bereits in Ausgabe 
11/86 angesprochenen 
Schneider Computer-Kredit 
können nun auch Interes¬ 
sierte des neuen PC 1512 in 
Anspruch nehmen. Für je¬ 
des System stehen fünf 
Zahlungsalternativen zur 
Verfügung. Nähere Infor¬ 
mationen erteilt jeder 
Schneider-Fachhändler 
oder: 

SKG Bank GmbH, 

6600 Saarbrücken □ 

Public Domain 
für Joyce 

Drei Disketten aus dem 
Public Domain Pool wer¬ 
den nun für den Joyce be¬ 
reitgestellt. Eine Diskette ent¬ 
hält viele interessante und 
nützliche Utilities, u.a. einen 
Diskeditor. Diskette 2 ent¬ 
hält lustige und spannende 
Spiele (z.B. Mastermind) 
und Diskette 3 beinhaltet 
ein komplettes Forth, das 
aber nur mit Zweitlaufwerk 
effektiv genutzt werden 
kann. 

Info: Sunshine Software 
5270 Gummersbach □ 

Fischertechnik 
für PC’s 

IBM bzw. kompatible PC's 
können nun auch in die 
Welt der „fischertechnik 
computing" einsteigen. 

Mit Hilfe des entsprechen¬ 
den Interfaces (ca. DM 250,-) 
können fischertechnik-Mo- 
delle nach eigenen Pro¬ 
grammen gesteuert werden. 
Neben dem Hobby-Bereich 
dürfte hier vor allem die 
Industrie sowie Schulen In¬ 
teresse zeigen. 

Info: Fischerwerkc 
6940 Weinheim/Bergstr. □ 



Ausbildungsbereich durchgesetzt 
hat Es wendet sich in erster Linie 
an den Anfänger, der im Selbst¬ 
studium oder unter Anleitung in 
Schule oder Seminaren das 
Programmieren erlernen will 

Merkel, Erich 

BASIC-Intensivkurs I 


Beilstein, Hans-Walter 

Wie man in FORTH 


Sprachelemente, Strukturen, 

Programmaufbau 

Reihe CHIP WISSEN 


programmiert 

Einstieg in eine faszinierende 
Computersprache 
Reihe CHIP WISSEN 
336 Seiten, 146 Bilder, 

48,- DM, 1986 
ISBN 3-8023-0165-X 
Das Buch wendet sich in erster 
Linie an Anfänger in FORTH. Die 
Sprache läßt sich relativ leicht 
erlernen und anwenden. Anhand 
anschaulicher Beispiele und vieler 
Tips und Tricks für die Praxis wird 
das Programmieren leicht 
gemacht Durch seinen guten 
didaktischen Aufbau ist das Buch 
zum Selbststudium und für den 
Schuleinsatz geeignet. Die Pro¬ 
gramme sind in PC-FORTH ge¬ 
schrieben und laufen unter MS- 
DOS auf IBM PC, unter Pro-DOS 
auf Rechnern der Apple-Familie 
und als cpcFORTH auf Schneider- 
Computern der CPC-Reihe 


Wie man in 

FORTH 

programmiert 


fl iVUMVtVTU k ( «VIt|Kll VTMN »U'lW 



CHIP 


260 Seiten, zahlr Bilder. 
28,- DM, 2 Aufl 1986 
ISBN 3-8023-0775-5 



CHIP 

WISSEN 




Intensivkurs 

IV\ml2' Uuem tÄ.ilnmß 
\cik* IVYSH -Sürukiurcn 
I ir.ltll, IVlIlVr Fluniy 
Unfc-Opef.il nai-Sv-äeni 




BASIC-Intensivkurs II 


Dateiverwaltung. Neue BAS1C- 
Strukturen, Grafik-Drucker, 

Floppy, Disk-Operating-System 
328 Seiten, zahlr Bilder, 

35,- DM, 1986 
ISBN 3-8023-0869-7 
Diskette erhältlich! 

Der BASIC-Intensivkurs ist vor 
allem für Aus- und Weiterbildung, 
für Schulen aller Art und auch zum 
Selbststudium geeignet In 15 
Lektionen vermittelt Band 2 fol¬ 
gende Inhalte: Strukturanweisun¬ 
gen neuer BASIC-Versionen, Gra¬ 
fik: Balkendiagramme und Funk¬ 
tionskurven, Drucker: Umgang mit 
Druckern, Möglichkeiten des 
Matrixdruckers, Dlsk-Operating- 
System: Wichtige Befehle u v m 


Teiwes, Eike 

Programmentwicklung 
in UCSD-Pascal 

Beispiele ■ Aufgaben • Anregungen 
Reihe CHIP WISSEN 
344 Seiten, zahlr Bilder, 

28.- DM. 2 Aufl 1985 
ISBN 3-8023-0760-7 
Das Buch vermittelt die systemati¬ 
sche Entwicklung von Program¬ 
men in Pascal, das in Verbindung 
mit dem UCSD-Betriebssystem ein 
ideales Programmierwerkzeug 
darstellt und sich nicht nur im 


Sie erhalten bei Ihrem Buch- 
und Computerfachhändler 
kostenlos das neue Verzeichnis 
,,'Vogel-Computerbücher '86/87" 
mit ca 120 Titeln 


^ VOGEL 

Buchverlag 

Würzburg 


Vogel-Computerbücher — 
mehr wissen, mehr leisten 
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I—Kurse 


Floppy- 


I [QTt-Tl I 


Nachdem wir uns im letzten Heft mit 
den Routinen zum Erzeugen einer 
Datei unter BASIC beschäftigt haben, 
wollen wir in dieser Lektion ein wenig 
auf die Assemblerprogrammierer 
eingehen. 

Unter den Leserbriefen der letzten 
Monate stand immer häufiger die 
Frage an, wie man die RSX-Befehie 
der Floppy in M-Code erreichen 
kann. 

Der Schlüssel zu diesen Befehlen 
liegt in zwei Firmwareroutinen, wel¬ 
che für uns schon die Hauptarbeit 
erledigen. 

Man kann sich zwar die Adressen der 
Routinen auch direkt im ROM- 
Listing nachsehen; sicher vor modi¬ 
fizierten ROM-Versionen oder gar 
einer völlig verschiedenen Speicher¬ 
aufteilung wie beispielsweise bei 
einer Vortex-Floppy ist man jedoch 
nur, wenn man den Rechner den ge¬ 
nauen Standort einer RSX-Routine 
selbst finden läßt. 

Der Firmwarevektor KL-FIND- 
COMMAND benötigt im HL-Regi- 
ster einen RSX-Befehlsnamen und 
gibt nach Aufruf einige interessante 
Informationen zurück. 

Der Vektor für KL-FIND-COM- 
MAND liegt bei Adresse &BCD4. 
Nach Ausführung des Jumps ist 
CARRY entweder gesetzt (Kom¬ 
mando gefunden) oder 0 (Kom¬ 
mando nicht gefunden). 

Des weiteren enthält HL die Adresse, 
an derdie RSX-Routine steht und das 
C-Register enthält den erforderlichen 
ROM SELECT. also die ROM NUM¬ 
MER, die beim Floppy-ROM immer 
7 ist. 

Mit dem Vektor KL-FAR-PCHL 
(Adresse &001B) kann dann eine 
Routine in einem Expansion-ROM 
direkt angesprungen werden. 

Alle Routinen des Floppy-ROM’s be¬ 
nötigen einen bestimmten Parame¬ 



•) * 

\ i • 1 

M 



tersatz zum Ar beiten. Wieviele dieser 
Parameter Vorkommen, muß im A~ 
Register angegeben werden. Die 
Adresse, an der die Parameter zu fin¬ 
den sind (Dateiname, Usernummer 
usw.), wird in IX angegeben. 

Die Assemblerroutinen in Listing l 
und 2 beantworten somit die häufig 
gestellte Frage, wie in Assembler die 
Befehle ITAPE und IDISC ausge¬ 
führt werden. 


Listing 1: 


ORG &5000 

;STARTADRESSE 

LD HL,BEFEHL 

;RSX BEFEHL LADEN 

CALL &BCD4 

;KL-FIN D-COMM AN D 

RET NC 

NICHT GEFUNDEN 


ZURUECK 

LD A,0 

;KEINE PARAMETER 

CALL &001B 

;KJL-FAR-PCHL 

RET 

;F,NDE 

BEFEHL: 

;RSX-BEFEHL 

DEFM ”DIS” 


DEFB ”C”+&80 



Listing 2: 


ORG &5000 

;STARTADRESSE 

LD HL,BF.FF.HL 

;RSX BEFEHL LADEN 

CALL &BCD4 

;KL-FIN D-COMM AND 

RET NC 

NICHT GEFUNDEN 


ZURUECK 

LD A,ö 

;KEINE PARAMETER 

CALL &001B 

JKL-FAR-PCHL 

RET 

;E.NDE 

BEFEHL: 

;RSX BEFEHL 

DEFM ”TAP” 


DEFB ”E”+&80 



Als kleiner Insidertip sei noch gesagt, 
daß man die Zurückschaltung der 
Tape-Vektoren auch noch wesentlich 
einfacher erreicht, indem man ein¬ 
fach die standardmäßige Sprungta- 
belle der Firmware komplett neu 
initialisiert, da ja dann die Vektoren 
mit den Sprungadressen des LOW- 
ROM's (KERNEL) versehen werden. 
Hierzu benötigt man nämlich nur 
einen einzigen CALL zum Firmware¬ 
vektor JUMP RESTORE, der bei 
Adresse &BD37 liegt. 

Ein CALL &BD37 bewirkt also das 
Gleiche, wie der Befehl ITAPE. 

Zum besseren Verständnis, wie man 
einem Befehl in Assembler auch 


noch Parameter übergibt, schalten 
wir in Listing 3 einmal den USER- 
Bereich der Floppy auf den Wert 5. 
Auch hier gibt es wieder einen Tip, 
wie sich diese Aktion ohne besondere 
Assemblerroutinen verwirklichen 
läßt und man Speicherplatz sparen 
kann. 


Listing 3: 


ORG &5000 

STARTADRESSE 

LD HL,BEFEHL 

RSX BEFEHL LADEN 

CALL &BCD4 

KL-FIN D-COMM AN D 

RET NC 

NICHT GEFUNDEN 

ZURUECK 

LD A,1 

1 PARAMETER FOLGT 

LD IX,USENUM 

USERNUMMER LADEN 

CALL &00IB 

KL-FAR-PCHL 

RET 


BEFEHL: ;RSX BEFEHL 

DEFM”USE” 


DEFB "R”+&80 


USENUM: 

USERNUMMER 

DEFW 0005 



Das Flag, in dem die aktuelle User¬ 
nummer festgelegt wird, befindet sich 
bei allen CPC’s glücklicherweise an 
der gleichen Stelle im RAM. Dieses 
Flag wird standardmäßig beim Ein¬ 
schalten mit 0 vorbelegt. 

Hierhin kann jedoch auch jeder an¬ 
dere Wert geschrieben werden. Im 
Gegensatz zum normalen RSX- 
Befehl IUSER lassen sich über diese 
Direktmethode auch User-Bereiche 
bis 253 anwählen. 

Man kann das Flag unter BASIC 
direkt beschreiben, indem man in 
Speicherstelle &A7Ö1 den entspre¬ 
chenden Wert poked. In unserem Bei¬ 
spiel sähe das folgendermaßen aus: 

in BASIC: 

POKE &A7ül,5 

und in Assembler: 

LD A,5 

LD (&A701),A 

Es gibt noch eine Menge anderer 
Flags im RAM, die für interessierte 
MC-Programmierer eine Menge Ar¬ 
beit durch Direktbeschreiben der 
Adressen erleichtern können. 

Eine genaue Liste der wichtigsten 
Floppy-RAM-Adressen folgt in der 
nächsten Lektion. Dort erfahren Sie 
auch, wie man nur durch Ändern ei¬ 
niger Adressen Fremdformate lesen 
kann, die Diskettengeschwindigkeit 
erhöht usw. 

Die Floppy-Anwender, die sich nur 
mit BASIC beschäftigen, mögen uns 
nicht böse wegen des eben Gelesenen 
sein. Der Floppy-Kurs soll jedoch für 
alle Anwender etwas bringen und im 
nächsten Heft folgen auch einige 
Routinen, die BASIC-Programmie- 
rer verwenden können. Bis dahin, viel 
Spaß. (TM) 
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DIE SUPERHITS VON 



LUCASFILM GAMES 


H'LQ|lMD : Qi! 


)ME COMPUTER 


von Lucasfilm stammen so weltberühmte Filme 
wie STAR WARS und INDIANA JONES 




Rescue On Fractalus! 


Eine phantastische Mischung aus Adion-Spiel und Flugsimulator mit 
erstaunlicher Grafik, Anlmotion und künstlicher Intelligenz. 

Sie hoben soeben ihre Elitetruppe zusommengetrommelt um die 
.Piloten* zu retten, die über Fractalus abgeschossen wurden und not¬ 
landen mußten Und dos in einer atomar verseuchten Atmosphäre. 
Holen Sie die Piloten aus dem feindlichen Gebiet 


Die verblüffende Realilätstreue hebt dieses Spiel 
weil über den Rahmen eines einfochen Action-Spiels 
heraus. Der 3D Effekt der Grafik ist äußerst gut 
gelungen, ebenso die Animotion der PiloleMfend 
Angreifer BORIS SCHNEIDER * 

im Spiele-Sonderheil von Happv Computer 


Koronis 

Rift 


Du bist so eine Art „Techno-Straßen¬ 
kehrer* Ein harter Job Ständig hälst Du Ausschau 
noch ölten Technologien, in der Hoffnung, damit einmal reich 
zu werden. 

Doch wo Du auch suchst - Du findest nichts. Bis Du KORONIS 
RIFT entdeckst, einen versteckten Ort, on dem technolo¬ 
gische Schätze aufbewohrt werden, wie Du sie Dir immer 
erträumt hosf. Nun ist es on Dir, diese sicherzustellen 

KORONIS RIFT ist eine brondheiße Neuheit von Lucas- 
film.die weit mehr ist als .nur ein Adionspiel* Neue 
Ideen, ein hoher Spielwert und vor allem eine neuartige 
3D-Grohk (basierend ouf der (rektalen Geometrie) 
mochen Koronis Rift zu einem Leckerbissen für alle 
Spiel efons. 


The 

Eidolon 


Enträtseln Sie die geniolste Erfindung des 19. iohrhunderts, 
das EIDOLON. Eine Maschine, die für futuristische Reisen 

konstruiere wurde. 

Doch - für welche Reisen 1 

EIDOLON ist die Summe lebenslonueErforschung der 
mystischen Kröftdfel Geiste^,und nimmt Sie mit ouf eine 
Reise in eine phantastische und geheimnisvolle Welt. 

Seltsame Energiesphören fliegen on Ihnen vorüber. Doch 
welchen Sinn hoben sie? 

Und wieso sinkt plötzlich der Energiepegel? 


.<P>re8eLFi 


Ballblazer 


Ac iivision Peni'.chUgd GmbH Posllarh 760680,2000 Homburg 76. 
■ERTRIEBJ3EUTSCItBRlD Arlolosoft Ifxclusiv-Otstribulpri Rushware 

lAulomierler Milverlrieb 

VERIRUB OSItRRIKH Korosofl Enclusi» Oislribulor 
VERTRIEB SCHWEIZ HILCU Exclusiv O.stributorl 


gehört zum Schnellsten und 
Aufregendsten, was je über 
Helmcomputer-Monitore 
geflockert ist. 

HEINRICH IEHHAI0I 
Happy Computer 1 IO/ 8 S 


- das schnallst« und spannendst« Turnier d«s Universums 

Wir schreiben das Johr 3097. Die interstellare Ballblazer-Konferenz wird gleich 
eröffnet Zum ersten mal hot sich ein Erdenbürger mit Zähigkeit und Ausdauer 
durch die Vorrunden gekämpft und hol nun die Chance, den begehrtesten Titel 
der gonzen Galaxie zu gewinnen: MASTERBLAZER. 
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1 ~~ Bericht 


Alle Jahre wieder... 



Das Weihnachtsfest steht vor der Tür, und 
auch dieses Jahr werden wieder Computer- 
und -Zubehör ihren Platz neben Haselnuß 
und Mandelkern unter dem Weihnachts¬ 
baum finden. Sollte heuer der Kauf eines 
Matrixdruckers ins Haus stehen, so können 
wir Ihnen die Entscheidung sicher mit un¬ 
serer Marktübersicht erleichtern. Wir ha¬ 
ben die Leistungsdaten von jeweils zwei 
Matrixdruckern der bekanntesten Herstel¬ 
ler zusammengetragen und zum Vergleich 
gegenübergestellt. Die Unterteilung ist in 
zwei Preisklassen erfolgt; die erste bis zu 
einem Endpreis von 1200,-, die zweite bis 
DM 2000,- DM. Sämtliche Preise sind 
empfohlene Endverbraucherpreise inkl. 
MWSt., die Daten entstammen allesamt 
den Datenblättern der Hersteller. 



Matrixdrucker bis 1200,- DM 




Bezeichnung 

Super GLP 

NL-10 


Punktmatrix (H x B) 

9x9 

9x 11 


Zeichen/Sek. (Entwurf) 

100 

120 


NLQ 

ja 

ja 


Traktor Standard 

optional 

ja 


Schnittstelie(n) 

8-Bit parallel 

8-Bit parallel (Option), seriell (Option) 


Papierformat 

A4 

A4 


Epson/IBM-kompatibel 

E/I 

E/I 


Anzahl Kopien 

2 

k.A. 


Lebensdauer Druckkopf 

k.A 

k.A. 


Zeichenpuffer 

2 KB 

5 kB 


Preis inkl. Schnittstelle 

906,- 

1295,- 


Matrixdrucker bis 2000,- DM 




Bezeichnung 

HPC-80 

SD-10 

DMPG9 

Punktmatrix (H x B) 

11 x 9 

9 x 11 

9 x 11 

Zeichen/Sek. (Entwurf) 

180 

160 

180 

NLQ 

ja 

ja 

ja 

Traktor Standard 

ja 

ja 

ja 

Schnittstelle(n) 

8-Bit parallel 

8-Bit parallel, seriell (Option) 

8-Bit parallel, seriell (Option) 

Papierformat 

A4 

A4 

A4 

Epson/IBM-kompatibel 

E/l 

E/I 

E/I 

Anzahl Kopien 

2 

2 

2 

Lebensdauer Druckkopf 

k.A 

k.A. 

k.A. 

Zeichenpuffer 

2 KB 

2KB 

2 KB 

Preis inkl. Schnittstelle 

1594.- 

1595,- 

1818,- 

Hersteller 

Centronics GmbH, 

Oberliederbacher Weg 42 

6231 Sulzbach/Ts. 

STAR 

Frankfurter Allee 1-3, 

6236 Eschborri/Ts. 

Fujitsu GmbH 

Rosenhcimer Str. 145 

8000 München 80 
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Matrixdrucker bis 1201),- DM 




Bezeichnung 

GP-12 

KX-P 1080 

ML 182 

Punktmatrix (H x B) 

9x9 

9x9 

9x9 

Zcichcn/Sek (Entwurf) 

80 

100 

120 

MLQ 

nein 

ja 

ja 

Traktor Standard 

ja 

ja 

ja 

Schnittstelle(n) 

8 Bit parallel 

8-ßil parallel, seriell (Option) 

8-Bil parallel 

Papierformat 

A4 

A4 

A4 

F.pson/IBM-komputibel 

k A 

E 

E 

Anzahl Kopien 

1 

k A 


1 cbensdauerDruckkopl 

50 Mio Zeichen 

>100 Mio Zeichen 

k.A. 

Xcichenpuffcr 

2 KB 

1 KB 

256 Zeichen 

Preis inkl. Schnittstelle 

910.- 

1137.- 

945.- 

Malrixdrucker bis 2000,- DM 




Bezeichnung 

GP 1570 

KX-P 1092 

ML 192 plus 

Punktmatrix (H x B) 

9 x II 

9 x II 

7 x 9. 9 x 9 

/.oichen/Sek. (Entwurf) 

160 

180 

200. 160 

M.Q 

ja 

ja 

ja 

Traktor Standard 

ja 

ja 

ja 

Schnittstclle(n) 

8 Bit parallel, seriell (Option) 

8-Bil parallel 

8-Bit parallel 

Papierformat 

A3 

A4 

A4 

1 pson/IBM-kompatibcl 

k.A 

E/l 

F. 

Anzahl Kopien 

2 

*> 

k A 

1 cbensdauerDruckkopf 

k.A. 

>100 Mio Zeichen 

k.A 

/eichenpuffer 

2 KB 

k A 

8 KB 

Preis inkl, Schnittstelle 

1932.- 

1936.- J 

1569.- 

Hersteller 

TEC Elektronik GmbH 

Chrisiincnstr. 15 

403(1 Ralingen 

Panasonic GmbH 

Winsbergring 15 

2000 Hamburg 54 

Okidata GmbH 

Hansaallee 187 

4000 Düsseldorf 11 


WOERLTRONIC 
dataphon s 21 d 

TECHNISCHE DATEN: 

Stromversorgung 

9 Volt Blockbatterie 
9 Volt Akku 
Ext Netzteil9-15V 
40-45 mA 

Schnittstelle 

V. 24/RS 232, 

Standard 25-Pin 
nach ISO 2110 

Übertragungs¬ 

geschwindigkeit 

max 300 bit/sek 

unverbindi. Preis¬ 
empfehlung DM 249,- 


WOERLTRONIC 
dataphon s21/23 d 

TECHNISCHE DATEN: 

Stromversorgung: 

wie dataphon s 21 d 

Schnittstelle 

V. 24/RS 232, 
Standard 25-Pin 
nach ISO 2110 

BTX-Rundbuchse 

Übertragungs¬ 

geschwindigkeit 

300-600-1200- 
1200/75 bil/sek 


PROBLEMLOS MIT COMPUTERN IN ALLER WELT KOMMUNIZIEREN: 

Per Telefon-von Datenbanken, Mailooxen, Großrechnern, zwischen Filialen, 
Zentralen, Außendiensten, Freunden und Bekannten - Daten, Texte und 
Programme abrufen oder übermitteln. 



Autom. Geschwindig¬ 
keitsumsetzung 
von 75 auf 1200 bit/sek 

unverbindi. Preis¬ 
empfehlung DM 359,— 


WOERLTRONIC - DATAPHON 

• Mit FTZ-Prüfnummer • Gebühren- und anmeldefrei • Für alle gängigen 
Telefonhörer geeignet •Vollduplexbetrieb# Answer- und Origina'temodus, 
automatische Kanalwahl • Made in Germany! 


Lieferbare Komplettsets 
bestehend aus: 

WOERLTRONIC-dataphon 

Anschlußkabel 

Terminalprogramm 

für: 

APPLE-II e/+ 

ATARI-ST 260/520+ 
ATARI-XE/XL 
COMMODORE C 64 
IBM/Kombatible 
SCHNEIDER 464 
SCHNEIDER 664/6128 

Info: 

Wörlein GmbH-FCo. KG 

Postfach 4 

D-8501 Cadolzburg 

Tel. 09103/8294, Telex 625337 

Erhältlich in Kaufhäusern, im 
Fachhandel und Versandhandel 
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Matrixdrucker bis 1200,- DM 




Bezeichnung 

SP 1000 CPC 

M-1109 

LX-90 

Punktmatrix (H x B) 

9x9 

9x9 

9x9 

eichen/Sek. (Entwurf) 

100 

100 

100 

NLQ 

ja 

ja 

ja 

Traktor Standard 

ja 

ja 

optional 

Schnitlstelle(n) 

8-Bit parallel 

8-Bit parallel, seriell 

Rcehnuninpcpulli (1 nach Wählt, scnell (Optima 

Papicrformat 

A4 

A4 

A4 

Epson/(BM-kompatibel 

E 

E/I 

E 

Anzahl Kopien 

2 

2 

2 

Lebensdauer Druckkopl 

k.A. 

k.A. 

k.A 

Zeichenpuffer 

k.A. 

2 KB 

1 KB 

Preis inkl. Schnittstelle 

799.- 

799.- 

898.- 

Matrixdrucker bis 2000,- DM 




Bezeichnung 

MP-1300 AI 

M-1409 

FX-85 

Punktmatrix (H x B) 

9\9 

9x9 

9x9 

Zciehen/Sek. (Entwurf) 

300 

180 

160 

NLQ 

ja 

ja 

ja 

Traktor Standard 

ja 

ja 

ja 

Schnitlstelle(n) 

8-Bit parallel, seriell 

8-Bit parallel, seriell 

8 Bit parallel, seriell (Option) 

Papierfbrmat 

A4 

A4 

A4 

Epson/IBM-kompatibel 

E/I 

E/I 

F./I 

Anzahl Kopien 

4 

2 


Lebensdauer Druckkopf 

k.A. 

k.A. 

k.A. 

Zeichenpuffer 

10 KB 

3 KB 

8 KB 

Preis inkl. Schnittstelle 

1895.- 

1653,- 

1848.- 

Hersteller 

Seikosha c/o Microscan GmbH 

Brother GmbH 

EPSON GmbH 


Uberseering 31 

Postfach 

Zülpiehcr Str, 6 


2000 Hamburg 60 

6368 Bad Vilbel 

4000 Düsseldorf II 


ELCOS ELECTRONIC-COMPUTER-VERSAND 



DISKETTEN 3” 
PANASONIC 

Spitzenqualität 


10 Stück 


99 r 


Best-Nr. Bl406 



TURBO-Copy- 
Holder, Konzept¬ 
halter u.a. für 
Computer-Listings 
sehr gut 
geeignet 


Best.-Nr. Bl 103 


TURBO-Monitorständer 

geeignet für alle Monitore 
bis 12,5 Zoll (31 cm) 

Dreh- und Schwenkfuß. 



295° 

Best-Nr. B1101 


DISKETTEN-BOX SS-50 

für 50 Disketten 3 bzw. 3'/ 2 ”, 
staubsicher und 
abschließbar 



Best.-Nr. B1112 



TURBO 3 
SCHNEIDER 

Profi-Joystick 
für Schneider- 
Computer mit 3 
auswechselbaren 
Griffen, Micro- 
schaltern + 

3 Feuerknöpfen 


Best-Nr. B1005 


39?° 



TURBO/S 

SCHNEIDER 

robuster Joystick 
für Schneider- 
Computer mit 
3 Feuerknöpfen 

2950 

Best-Nr. B1004 


ANSCHLUSSKABEL RS 232 

RS-232 auf RS-232, 
programmierbares 
Anschlußkabel. Löst 
fast alle denkbaren 
Konfigurationen. 


ACHTUNG! 


545° 

Best-Nr. B 1303 


Wir haben noch viel 
mehr zu bieten! 
Unbedingt unseren 
Katalog (kostenlos) 
anfordern. 


ELCOS Electronic-Computer-Versand GmbH • Postfach 110605,1000 Berlin 11 
® (030) 261 1810, Postgirokonto: Bln/W, Konto-Nr.: 49 03-108 (BLZ 10010010) 


Lieferung nur per Nachnahme oder Vorauskasse unfrei+ Verp. Ab DM100,- 
Auftragswert frei+Verp. Ab DM 250,- Preis incl. Verp. 
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Matrixdrucker bis 1200,- DM 



Diese Übersicht stellt die Art 
von Daten zur Verfügung, die 
für eine Kaufentscheidung von 
primärem Interesse sind, wie 
etwa die Geschwindigkeit oder 
die Steuercode-Kompatibili¬ 
tät. Andere Daten, die für eine 
gewünschte Anwendung von 
Interesse sein könnten, sind 
über die angegebenen Her¬ 
stelleradressen zu erfahren. 

Zeichenerklärung: 
k.A. = keine Angabe 

E = Epson-kompatibel 

I = IBM-kompatibel 

Bezeichnung 

LSP 120 D 

DMP 2000 

Punktmatrix (H x B) 

9x9 

9x9 

Zeichen/Sek. (Entwurf) 

120 

105 

NLQ 

ja 

ii 

Traktor Standard 

ja 

ja 

Schnittstelle(n) 

8-Bit parallel, seriell (Option) 

8-Bil parallel 

Papierformal 

A4 

A4 

Epson/IBM kompatibel E/l 

E 

Anzahl Kopien 

2 

1 

Lebensdauer Druckkopf 

IOO Mio. Zeichen 

k.A 

Zeichenpuffer 

4 KB 

2 KB 

Preis inkl. Schnittstelle 

946,- 

648.- 

Matrixdrucker bis 2000.- DM 



Bezeichnung 

MSP 10 E 


Punktmatrix (H x B) 

9x9 


Zcichen/Sek. (Entwurf) 

160 


nlq 

ja 


Traktor Standard 

ja 


Schnittstelle(n) 

8 Bit parallel, seriell (Option) 


Papierformal 

A4 


Epson/IBM kompatibel 

E/l 


Anzahl Kopien 

2 


Lebensdauer Druckkopf 

100 Mio Zeichen 


Zeichenpuffer 

S KB 


Preis inkl Schnittstelle 

1648.- 


Hersteller 

Citizen c o Synelec GmbH 

Postfach I.S 17 27 

8000 München 15 

Schneider Computer Division 

Silvastr. 1 

8939 Türkheim 


SCHNEIDER PC 

PC 1512 SD 1 Diskettenlaufwerk 1896 -12385,- 

PC 1512 DD 2 Diskettenlaufwerke 2349-/2749,- 

PC 1512 SD 10 MB 1 Lauwerk, 10 MB Festplatte 2980,-/3499.- 

PC 1512 SD 20 MB 1 Laufwerk, 2C MB Festplatte 3699, -4299, 

DMP 3000 Drucker zum neuen PC 729.— 

nässendes Druckerkabel 54,— 


SOFTWARE FÜR DEN NEUEN PC 
Wordstar Junior mit MailMerge 
dBase II Junior 
Multiplan Junior 
TurboPascal 

Fröu uroiessionciie nnanzbuchnaitung 
WINDOW ADRFSS Adressveiwaltung 
'.VINDOW KASSE kam Kassentiuchiiihruiig 
CARAT AUFTRAG PC prot Aullraosabivickluna mit Artikel! 
Kundersiamm, Lieterantenst.. EK, VK, Statistik 
CARAT LAGER PC kam EagÄücng 
AGENTUR PC Versicheiunosagenturwwallnng 


KX P ’080 
KX-P 1092 


PANASONIC DRUCKER 
669,- KX-P1091 


1048 - 


KXP 1592 


389- 
389,- 
289,- 
285— 
Wäü - 

98- 

98- 

979,- 

289- 

1100 .- 


789,- 

1399,- 


TG-Soft 




wmmm 

fev: VORTEX 


lg 

fi s 9i9, 

1-:-:-:-: nx m- 

t mi-s 9C9,- 

(yy/j. MIX 729,- 

SP?5S m - 

HD 

F1-XRS 

MID 

MI-XRS 

SP 512 

1398,- [iv 
848- 

wir fx 
848, - 

379,- jx; 

Aurrüsisair 256 kb 


99.- X: 

fx'-X VAK 300 Akustikkoppler 
vcrlex PHONO Sei 


iss, [>■ : 

47R,- IX- 

jX-X- 10 Stück Panasonic 3" CF2 Disketten 
|;X;X 10 SlLirl Wrhalim 525 DS DD Disketten 


89, ?X : 

49,90 x : : 

y-'.-y. ig stjir y 3" CF ? 00 Oisketien im Joyce*- 


148,- l’x 

FD? l MBZweitlautoerk lur Juvte 

256 KB ftamerwaterung tot J( • 
kompl Aulrüstsatr Joyce - Joyce i 
Inwiorautsaht lur Nlü 401 
;X;X Datemacoioei lur CPC 664/6128 

X;X' Mirage Imager 
j:;X;: ; CPCMouseftsck 


5«9, 

129. 

699- 
65,- X; 
89, x 

199 - 

189, [:•: 











' 



SOFTWARE 



Verbentrainer ENGLISCH 

CPC 

39,—r49,— 


Joyce 

59,- 

Vokabeltrainer lur Englisch und Latein 

CPC 

45-/55,- 


Joyce 

59- 

Faklum 38 pro/ Burosol twarepaket 

Joyce 

298- 

Caral Lager plus umlangi Lagerverwailurig 

Joyce 

286- 

Carat-Kasse plus piof Kassenbuchlührung 

Joyce 

468.- 

Carat Auttrao is linke Spalls) 

Joyce 

488- 

M&f F ina nznuc liha It ung 

CPCÜoyce 

189,- 

DR DRAW pro). Zeichenprogramm 

Joyce 

179.- 

DR GRAPH graph Darstellung von Daten 

Joyce 

173- 

WbrdstarWBase 1 It/Iuliiplan 

CPC/Joyce 

je 179,- 

Pakei Wtorastai • dBase u • Mulliplan 


499.- 

Aiche, edrem schnelle Dalek/erwallung 

CPCüoyce 

79- 

Turoo Pascal 3,0 

CPC/Joyce 

215- 

Tnrhn Pascal mit Grafikuniersl 

CPCüoyce 

275,- 

Tuibo Graphl» ToolOOX 

CPC 5128 

215- 

Microuuit Basic Compiler 

CPC 

199,- 

CL0NL Kopierprogiamrri 

CPC 

66 - 


uet wiäiifiu emnyi per’ NäwinäiüM öüei 
Vtirauskasse (2%' Skonto) 

Aiiu Preise zzgi \tetsandtosiananiell 1 


TG-Soft ■ Offersdorf 5 ■ 8491 Rimbach ■ Tel. (0 99 41) 37 65 
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I Bericht 


Interview 



Seit ihrem ersten Erscheinen hat CPC 
International sehr viel den freien Mit¬ 
arbeitern zu verdanken. Nur durch ihre 
zahlreichen Beiträge konnte es gelin¬ 
gen, bei ständig wachsendem Umfang 
unserer Zeitschrift allen Aspekten der 
verschiedenen Schneider-Computer 
durch Listings und Fachbeiträge ge¬ 
recht zu werden. Letztlich hatten wir 
Gelegenheit, einen unserer Mitarbeiter 
persönlich in der Redaktion zu be¬ 
grüßen, der den meisten CPC 
International-Lesern kaum unbekannt 
sein dürfte: Matthias Uphoff, 33, Autor 
der Serie „Das Software-Experiment” 
und der Programme CONTEXT und 
COPY-SHOP. 

Bei Gesprächen in unseren Redaktions¬ 
räumen kamen verschiedene Themen 
zur Sprache, die wir hier aus¬ 
schnittweise wiedergeben wollen: 

CPC: 

Kaum ein Monat vergeht, ohne daß 
man einen neuen Hit von Matthias 
Uphoff in CPC International findet. 
Welche Ausbildung oder berufliche 
Qualifikation steht eigentlich hinter 
den Programmen und Artikeln? 

M. Uphoff: 

Ich fürchte, da muß ich euch enttäu¬ 
schen. Von meiner Ausbildung her bin 
ich Gymnastiklehrer und arbeite auch 


praktisch in dem Bereich, das heißt 
freiberuflich als Lehrer für chinesi¬ 
sche Heilgymnastik und Bewegungs¬ 
meditation. Früher habe ich aller¬ 
dings mal ein paar Jahre Physik 
studiert... 

CPC: 

...und dabei das Programmieren 
gelernt? 

M. Uphoff- 

Naja - ein bißchen. Ich besaß damals 
einen programmierbaren Taschen¬ 
rechner TI 59, der mich ziemlich 
fasziniert hat, und mit dem habe ich 
schon einiges ausprobiert, zum Bei¬ 
spiel das „Game of Life” und das 
Ökologie-Experiment. Aber viel war 
da nicht zu wollen, die Maschine ver¬ 
fügte gerade über 1 KByte Speicher¬ 
platz und arbeitete 20 Befehle pro Se¬ 
kunde ab, wenn sie gute Laune 
hatte. 

Natürlich sollte ich auch FORTRAN 
am Uni-Großrechner lernen, aber, 
wie aus dem gesamten Studium, ist 
daraus nicht viel geworden. 

CPC: 

Wie kommt ein Mensch dazu, der 
eindeutig eine mathematisch-natur¬ 
wissenschaftliche Begabung hat, sein 
Studium ohne Abschluß an den Na¬ 
gel zu hängen? 


M. Uphoff: 

Das hatte wohl verschiedene Gründe. 
Die ganze Situation an der Uni 
Bochum lag mir nicht besonders, das 
wareine ziemliche Lernfabrik. Selbst 
an den schönsten Sommertagen saß 
man da in Betonbunkern bei Neon¬ 
licht mit bis zu 500 Leuten in einer 
Vorlesung, um Sachen mitzuschrei¬ 
ben, die man in irgendwelchen 
Büchern sowieso nachlesen konnte, 
und es gab keinen wirklichen Anreiz 
für kreative Arbeit - nur Übungsauf¬ 
gaben, die schon Tausende vor einem 
gelöst hatten, nichts wirklich Span¬ 
nendes. 

Außerdem gefiel mir nicht, daß ich 
mich dabei mehr und mehr zu einem 
Kopfmenschen entwickelte, was ich 
als sehr einseitig empfand - von da¬ 
her zogen mich asiatische Philoso¬ 
phien und Bewegungsformen stark 
an, als ich sie kennenlernte, da sie in 
eine ganz andere Richtung deuteten. 
Jahrelang hatte ich dann überhaupt 
nichts mehr mit Naturwissenschaften 
oder Computern zu tun, bis auf einen 
Schachcomputer, mit dem ich ab und 
zu mal eine Partie spielte. 

CPC: 

Lassen sich denn solche gegensätzli¬ 
chen Elemente überhaupt unter einen 
Hut bringen? 

M. Uphoff: 

Zur Zeit geht's ganz gut - friedliche 
Koexistenz, würde ich sagen. Teil¬ 
weise ergänzt es sich sogar ausge¬ 
zeichnet. Die Konzentrationsfähig¬ 
keit, die man durch asiatische Tech¬ 
niken lernt, ist zum Beispiel bei der 
Programmentwicklung ausgespro¬ 
chen nützlich, und da die Arbeit mit 
dem Computer mit Sicherheit nicht 
gesundheitsfördernd ist, brauche ich 
den Ausgleich unbedingt. Außerdem 
meine ich, daß ein Mensch nur glück¬ 
lich sein kann, wenn er sich in allen 
seinen Möglichkeiten entwickelt, 
auch wenn die Mischung, die dabei 
herauskommt, etwas verrückt ist. 

CPC: 

Und wie kam dann der CPC ins 
Haus? 

M. Uphoff: 

Ja, das war so: Bekannte von mir hatten 
sich einen IBM PC gekauft, um damit 
beruflich zu arbeiten, und ich wurde 
eingeladen und durfte auch mal aus¬ 
probieren... und da war es um mich 
geschehen: Ich wollte auch einen 
Computer haben. Ein IBM w 7 ar mir 
allerdings zu teuer, und da habe ich 
mich zunächst etwas umgeschaut 
und informiert, bei dieser Gelegen- 
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heit übrigens das erste Mal CPC 
International gekauft, das war die 
Ausgabe 4/1985, wenn ich mich 
richtig erinnere - und dann dauerte es 
nicht mehr lange, bis der CPC 464 bei 
mir zu Hause stand. 

CPC: 

Stand denn damals schon die Idee 
dahinter, den Computer beruflich 
zu nutzen? 

M. Uphoff: 

Nein, nicht direkt. Zunächst hatte ich 
ja genug damit zu tun. BASIC zu ler¬ 
nen, das ging eigentlich sehr schnell, 
und dann kam Assembler, was schon 
etwas schwieriger war. Nachdem 
meine ersten Programme fertig waren 
und ich in den Fachzeitschriften sah. 
was da so als Listings abgedruckt 
wurde, sagte ich mir „Das kann ich 
auch” und habe ein paar kleinere Sa¬ 
chen eingeschickt, zunächt an die 
DATA WELT, die auch angenom¬ 
men wurden. 

Mit der Gymnastik lief es zwar befrie¬ 
digend zu der Zeit, war aber vom 
Finanziellen her immer schon etwas 
wackelig, so daß der Computer als 
zweites berufliches Standbein ein¬ 
fach mehr Sicherheit in Aussicht 
stellte. Natürlich gab es noch einiges 
Hin und Her und auch einige Enttäu¬ 
schungen, bis ich dann endlich in 
CPC International einen fairen Ar¬ 
beitgebergefunden hatte. 

CPC: 

Als Durchbruch muß man wohl 
CONTEXT bezeichnen, sicherlich 
eines der erfolgreichsten Lislingpro- 
grarnme überhaupt. War dieser Erfolg 
erwartet? 

M. Uphoff: 

Nein, überhaupt nicht. Ursprünglich 
ging es nur darum, ein vernünftiges 
Textverarbeitungsprogramm für den 
eigenen Bedarf zu schreiben, nachdem 
die Arbeit für CPC International 
deutlich zunahm. 

Ich hatte mir zwar schon vorher eine 
einfache Textverarbeitung in BASIC 
geschrieben - die hieß Sokratext - aber 
die war einfach nicht leistungsfähig 
genug. Also habe ich mich an die Ar¬ 
beit gemacht, ohne zu ahnen, welche 
Größenordnung dieses Projekt an¬ 
nehmen würde. 

Besonders naiv war wohl die Idee, das 
Programm nur mit Kassettenrecor¬ 
der zu entwickeln, ein Laufwerk kam 
erst in der Schlußphase dazu. Das hat 
unheimlich viel Zeit gekostet, aber 
vor dem Kauf weiterer Geräte sollten 
sich der Rechner und der Drucker 
erst mal bezahlt machen. 


CPC: 

Gab es irgendwelche Vorbilder bei 
der Programmierung? 

M. Uphoff: 

Eher im negativen Sinne. Zunächst 
hatte ich versucht, eine ältere Version 
von TASWORD an meinen Bedarf 
anzupassen, doch das klappte hinten 
und vorne nicht. Irgendwann saß ich 
dann mal im Druckermenue fest, das 
heißt, das Programm wollte um jeden 
Preis drucken, ich wollte aber vorher 
noch was ändern, und da wir uns 
nicht einigen konnten, flog es schließ¬ 
lich in die Ecke, und ich beschloß, ein 
besseres Programm zu schreiben. 
Eine wichtige Leitlinie bei der 
Programmierung war die Idee, daß 
meine Mutter, die damals noch eine 
alte Schreibmaschine benutzte, mit 
CONTEXT zurechtkommen sollte - 
deshalb also solche Effekte wie das 
Unterstreichen auf dem Bildschirm, 
die Seitenstruktur und ähnliches. Ge¬ 
rade für ältere Leute spielt die Über¬ 
sichtlichkeit und der Bezug auf be¬ 
kannte Strukturen eine wichtige 
Rolle. 

CPC: 

Wie aus zahlreichen Leserbriefen 
hervorgeht, haben viele Leute eine 
professionelle Textverarbeitung in 
der Schublade, schreiben aber trotz¬ 
dem ihre gesamte Korrespondenz mit 
CONTEXT. Wie ist das zu erklären? 

M. Uphoff: 

Tja - offenbar bin ich mit dem 
Programm, ohne es zu ahnen, direkt 
in eine Marktlücke gestolpert. Es be¬ 
stand wohl ein ziemlicher Bedarf 
nach einer übersichtlichen und 
schnellen Textverarbeitung, mit der 
sich ohne umständliche Prozeduren 
schnell mal ein Text entwerfen läßt. 
Daß CONTEXT nicht alle Funktio¬ 
nen bietet, die moderne Textsysteme 
normalerweise zur Verfügung stellen, 
wurde dem Programm dabei erstaun¬ 
liche rweise verziehen. 

CPC. 

Wird es noch weitere CONTEXT- 
Versionen geben? 

M. Uphoff: 

Natürlich gibt es eine Reihe Punkte, 
an denen Verbesserungen denkbar 
sind, aber eine neue CPC-Version 
wird es wahrscheinlich nicht mehr 
geben. Wenn schon, dann auf dem 
Schneider-PC. 

CPC: 

Einige Zeit nach CONTEXT traf dann 
schon die erste Version von COPY¬ 


SHOP in der Redaktion ein. Aus wel¬ 
cher Motivation ist dieses Programm 
entstanden? 

M. Uphoff: 

Genau wie bei CONTEXT: Es wurde 
einfach gebraucht. Ich wollte meine 
Artikel durch Diagramme oder 
Illustrationen ergänzen, hatte aber 
keine Lust mehr, mit Lineal und Filz¬ 
stift rumzuhantieren. Also mußte der 
Computer ran, und ich program¬ 
mierte eine Kombination aus einer 
leistungsfähigen Hardcopyroutine 
und einem Editor für Blockgrafik. 
Damit wurde dann gearbeitet, und 
immer, wenn irgendwas fehlte oder 
sich als unpraktisch erwies, wurde 
das Programm neu überarbeitet - es 
hat eine Art Evolution durchlaufen, 
könnte man sagen. 

CPC: 

Welche Anforderungen stellst du an 
deine Programme? Wann bist du mit 
einem Produkt zufrieden? 

M. Uphoff: 

Also, normalerweise verlange ich von 
einem Programm nur, daß es mich 
nicht ärgert, wenn ich mit ihm ar¬ 
beite. Bei COPY-SHOP war aller¬ 
dings schon ziemlich früh klar, daß es 
in den Software-Vertrieb sollte. Da 
liegen die Ansprüche natürlich 
höher, und das hat die Arbeit auch 
beeinflußt. Das Programm sollte so 
überzeugend werden, daß ich es mir 
selbst im Laden kaufen würde. 

CPC: 

Ist denn so etwas wie ein perfektes 
Programm realisierbar? 

M. Uphoff; 

Mit Sicherheit nicht! Jeder Anwender 
hat ja andere Ansprüche, und die 
können nicht alle durch ein Pro¬ 
gramm gleichermaßen abgedeckt 
werden. Aber man versucht natür¬ 
lich, beim Programmieren bis zu 
einem Punkt zu kommen, wo die 
ganze Sache irgendwie stimmig wirkt, 
also vom Gefühl her eine runde Sache 
ist. 

CPC: 

Ein Programm, das in den Software- 
Vertrieb geht, muß ja mehr können, als 
nur Anwendungen des Autors ab¬ 
decken. Welche Einsatzgebiete sind 
bei COPY-SHOP noch denkbar? 
Wer kann das Programm gebrauchen? 

M. Uphoff: 

Da gibt es viele Möglichkeiten. Wenn 
zum Beispiel jemand ein Programm 
einschicken und die Dokumentation 
durch Bildmaterial ergänzen möchte. 


12'86 CPC 21 






Supercopy 

Das Diskellenkopierprogramm 
der Superlative 

für Schneider CPC 464 664 6128 und Joyce 

• 100’'.; Maschinensprache bearbeitet all? 

43 Tracks 

• unlerstulzl aueb 2 LautSieUi 
a-a a-b b-a b-o 

• ieoe mögliche Sekiorqroße unc. Sektor 

• Sektoren mit gelöschter oaia aciress mark 

• kopiert ggnr der aul dem Markt befind¬ 
lichen Sollware (1 1 Sicherheilsduplikaii 
Riri unentbehrliches -disc-lool- für |eden 
CPC und Joyce BesMzer 


3 Disneiie 


OM 79, - 


f Sonderangebote > 

Spitzen Spiele zu Tiefstpreisen 

Kn.yhl Leis 

Glv In 15 

Bouri', Boi! sh-' h v'r 
Bim-: L-' 

FioNü D il ii 
Darf Slr.r 
in Trabis Cr.-tiol 
PlTlOel WliTrld 
Blag gor 
Pairi! Box 
Har:: Hai Mao. 

R- u -ie Oasli 

Jedes Spiel auf Kasselle für 35,- DM 

Dun Daradi 
Hause cf Usliei 
Je! Sei Willy 
Mi II Hinaus 
Rl»; Horror Shuv 


Mnii Oi'tce 
i -an- Brunos Boxinri 
Ruesl ( T IVoiitl b [i 
Heroes ol Kam 
Hacker 
Ta j Cen 
Genesis 
Ihr 13Vi 
Jüt Bool Ja.’.' 

Minoei 
Dovils Cro vn 
Janimin 
Fiank n Slein 
Kor q sinke Bao- 
Su:;t'i Piorltna h 
OlKKian 
A!o ti Smas'iia 

Jedes Spiel auf Kasselle für 25.- DM 

h'Rul 
Manie Mnei 

r Inns inuialoi 

Jedes Spiel auf Kassette für 15,- DM 
v Nur solange der Vorrat reicht ^ 

^Sie ist da !!!! 

Die 10'20 MB Harddisk lur Ihren Joyce 
PCW 8256/8512! 

- 10/20 MBytes lormatierl 

- IBM PC kompatibel 

Sehr schnelle Zugriflszeit 85ms! 

- Einfache Inslallalion 

- Speicherplatz auf lOMByles - 
3000 A4 Seiten bei Texlverarbeilung 
Verwandelt Ihren Joyce vom Texlverarbei- 
lungssyslem zum kompletten Burosystem 
oder v issenschafthchei EDV System 

- Mach! umfangreichen Einsalz Ihres Joy 
ce durch reichhaltige Schneider Sofkvaie 
möglich 

- Weifere AnschJußmöglichkeilen durch Ex 
pansionsoorl 

Im Lieferumlang isl Harddisk Formalie 
rungsprogramm sowie Conlroller 
enthalten 

Die Harddisk Unit ist die Expansionsrnöglich 
keil lur Sie 1 

Selzen S e sich mit uns in Verbindung 
beraten Sie gerne 1 

10 MB Laufwerk Einfuhrungspreis 

1.898, - DM 

20 MB Laulweik Eirififhrungsnreis 

. _2.498,- 






Schneider 

COnPUTER Division 



^Hervorragende Programme für Handel. 
Handwerk und Gewerbe, 

Business Star 

- Lagervc". «fiuny 

- Man: i vesen 

- 0'ten© Rostet! Bucittsu jul; 

Datenvei 

- Dsenslprc othvto 

Preis 298 - 0M 

Fibu-Star-Plus 

Stammdacenveri am mg 
UmsaUslcuef ver ■ .atlurg 
freier Kontenrahrneri I4QO Konten) 

- Zuordnung Sachkonlen 

- Buchungsiournal 

- Summe sVnconiisien 

- nach Bcleo' . inn"ern sorlierr 

=reis 298 - DM 

Star-Mail 

- LocoScnpter Weiterung 
Rechnen • Kalkulieren 
Tabellen * Formulare 

- interaktives Bneteschreiben 
Erhellen von Serienbriefen 
Rechr*itni,iei i - Anyebolc- 

- Verkaufs-AriKel-Lager Listen 

p- 98 OM 

Star-Base 

- Daten banksysiem 

- Eigene-* Window Manager 
Menu*3oneri!ieri 

- iDO Oaronfeiäer io Maske 

- 88 Zc-tchon oro Datenfeld 

- Suchen lind Selektieren 

- arbeite* mit LpeoSenD 1 

- Serienbnc'e-rslnllvjng 

k Prc-is 198 - OM 


Star Division 
Programme 


Statistic-Star 


98,- DM 


Verwendung als Statistikpro- 
gramrn Führt in sekunden¬ 
schnelle Berechnungen durch 
bei denen Sie mit dem Taschen¬ 
rechner Stunden brauchen 
wurden 


Datei-Star 


98. - DM 


ist em anwenderfreundliches Da 
lei Verwaltungssystem mit dem 
Sie jegliche Art von anfallenden 
Daten verwalten können 


Joyce-Mailing-System 

189, - DM 

Ist die Zusammenfassung der 
beiden hervorragenden Program¬ 
me Star-Mail und Datei-Slar 


Spiele für Joyce 


1 30 Clock Chess 

79,90 DM 

2 Aftershock 

69,90 DM 

3 Batman 

59, - 

DM 

4 Bridge Players 

59, - 

DM 

5 Cyrus Chess 

69, - 

DM 

6 Fair light 

59,- 

DM 

7 Heroes o > Kharn 

59, - 

DM 

8 Hitchhikers 

99, - 

DM 

9 Lord ofthe Rings 

99, - 

DM 

10 SAD Raid 

59, - 

DM 

ii Space Invaders 

49. - 

DM 

^12 Tomahawk 

79, - 

dm/ 


i Vission Etowio' 

39— 59- 

? Moniy O" th# Ru" 

39 -r.SS 

3 Movie 

35- 39 

4 N ijni Snadf 

33 49 - 

5 Pirig Poiig 

35—49 

b Pio Tennis 

39 —'39 - 

7 Rcc-n W'esll» 

2 S 

8 S.t Como.r 

39 - m 

9 S.itoieu' 

39 59 - 

10 Sfyjyun 

39 - 38 

ii Sv.eevos Wo-lo 

29-149- 

12 Soccer 

39-'59 

13 Thing on »Sptmy 

29 49 

14 Tu'Oa'uD.1 

3* — 

Ul 

39-59^ 


r \ 

Der neue Schneider PC 


PC MM/SD 

5 : 2 *B Ri’cfiiint - t, 



PC MM/DO 

r’2 fß Rccmw • • 

. orafo« • 

1 999,- DM 



2 499.- DM 

PC CM/SD 

5 ; 2 )B Rernrvi . F 



Laut.*,»! 


2 499 - DM 

PC CM/DD 

512 kB Bkr tu " . i 
2 UutlMTTU 


2 999.- DM 

PC MM/HD 10 

' 

■ 


3499 - DM 

PC MM/HD 20 

512 kB 8*" hm 1 . K 



Lauf.'.tnk • 

20 MB FfsirMiii 


3.999.- OM 

PC CM/HD 10 

. 

.uliniön 


1 inl'.-.fllk - 

10 MB FrslDMlIi 


3.999,- DM 

PC CM/HD 20 

1 

Tumor - 




4 499,- DM 


Wir nieten thnen auch günstige Ltasino 
konditionen um Ihnen bei geringer, [man 
ziellen Belastungen den Kauf unserei PC 
Hardware zu eimotjlichei 
Zum Beisoiel 

Joyce-t- Kauf wert 2490 - DM 
Eiste Leasmgkilt 83,61 DM 

35 Leasing ml er a 84.- DM 

Bitte setzen Sie sich mit uns in Verbin¬ 
dung. Wir beraten Sie gerne! 


Alles für Ihren C«j aus einer Hand. 

Wir unterhalten ein großes Lager für Hardware, Zubehör und Software. 

Potsdamer Rinq 10 • 7150 Backnang • ■‘S* 07191/1528-29 
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WERNER 

Das wohl verrückteste Spiel dieses 
hunderls Bestehend aus 4 Teilen 

i einer irrsinnigen ArlijhlV'l 
angfii Woiorrao Consli lelKin S@ .- f 
3 aiRtJf'IcicMI i 'Ln- WaJuisiru'Sh'i 1 
splnstueöÄi.t -11 vhlcm *c 
-i 0 ' ngllVERUFRöe ih nlw a» 
iVLRf.tR - iiri H.’l" Ht-lo ties 2G J-rm : 
Acnf 

Dm ■ ,ciic T ni ist .ti:' \ u lur mint ,-yi, 
WERFER das Sjj-tH <i i 1 Kaa Dis 

^ 29 -/49. 


Jahr 

F*!tR 


- o ty 




Spiele 

3D Grand Pin 39 —19- 

■ 1 39- 59 

Sajlman 29 .13 

Biggles 39—59- 

3'flOe Hunne« 35 52 — 

9omo Jet* 39 -49- 

Coiossui CHAS 4 0 !S- 

C>a*1on & Xu"ks-'Gel Dwie- 39 59- 

EwnBlue? CroTi'-tUy ölue-i 3? 59- 

Eou'boi 39— 59 — 

FairligM 3S *SS) 

Ghosli n GcoM't . 39 49 

Jd:k UH! Nippe 39 - 59 — 

Lase'BAü'i 69—Z9 

Meliawr 39 59 . 


Weiteres Zubehör 

Nel7tßil MP 1 148,- DM 

Nelzleil MP 2 168 - DM 

Kassellemecordei Im 66-^ 6128 
m I Kabel 98.- DM 

BiCischmiBlm Im 

GT 65 f0n.nl 58,- DM 

CTM 640=644 (colür) 78,-DM 

Joyce (Momloi) 86.-DM 

3 Disketten CF2 k 10.80 DM 

10 Sl 98,-DM 

3 Diskellen CF2DD 16.80 DM, 




























































Mirage Imager 

Sicherheitskopie ? 

- Kein Problem 

ZzJ gib! es letzt den "MIRAGE IMAGER ! 
- v'srn einfache Handhabung Uberlrägl 
ödes Programm auf Diskette oder 
Kassette durch einfachen Tastendruck 
jnisroricht jedes Spiel an beliebigem Punkt 
schert es und macht späteren Zugriff 
möglich 

•in.venderfreundlich durch Menuesleuerung 
100 °rc Fehlerabsicherung 
Sehr hohe und leistungsfähige Kompn 
Gierung benötigt somit ein Minimum an 
Kapazität auf Ihrer Diskette oder Kassette Bei 
Aospeicherung aut Kassette zwei Geschwin 
oigkeiten wahlbar 

besteh! aus 8K Rom und 8K Ram Hard 
.'.die und wird led gl ch auf den Expansions 
oor| ihres CPC (464,664.6128) aufgesteckt 
Achtung!!!!! Nur erlaubt für Ihre persönli 
chen Sicherheitskopien! 

hmtuhrungsoreis 198,- DM 

Adapter für CPC 6128 30 - DM 


dk-tronics 

- Speichererweiferung 64k 198,- DM 

- Speichererweiferung 256k 298,- DM 

- Sprachsynthesizer 158,- DM 

- A RS 232 (orig. Amstrad) 248,- DM 

- Soundsynthesizer SSA 1 148,- DM 


Cumana 

3 Diskettenlaufwerk 40 Spuren einseitig 250KB 
iM Netzkabel und Anschlußkabel für CPC 464, 
664 u 6128 als zweites Laufwerk 

399.- DM 

5 • 4 Laufwerk für CPC 464 80 Spuren dop 
osiseifig 1 MB mit Nelzkabel Anschiußkaöel 
ais Zweitlaufwerk Alle Funktionen des CPC 464 
Die osn voll erhalten 

699 - DM 

5 1 2 Laufwerk wie oben, aber für CPC 664 

799,- DM 


om\ 

OM 

OM 


39 -/59, DM 


-c.ivato- 36, 

2 3'i~an Kas Dis 29.-/49, 

3 Soges Kas'Dis 39.-Z59. 

4 CraHo/i & Xunc Gel De4er 
Kas Dis 

5 Ecsn BluesDooinsdav Blues 

Kas Dis 39.-Z59,- DM 

6 Ecwna« Kas Dis 39.-Z59,- DM 

7 Fairlighl Kas Dis 39,-/59,- DM 

8 Gladiator Kas -Ois 39.-Z59,- DM 

9 Ghosls- Gohlms Kas 'Dis 39,—/49, — DM 

10 He<enr-uehu n Kas Dis 29.—/49,- DM 

11 Jack :Mc NiDper Kas'Dis 39.-/59,- DM 

12 Krughi Games Kas'Dis 39,-/59,- DM 

13 Laser Basic Kas Dis 69,—/79,— DM 

M MelldOv.n Kas Ds 39,-/59,- DM 

15 Mission Elevalor Kas Dis 39,-/59.- DM 

1 Mission Omega Kas D.-s 39,-/59,- DM 

1 Nontv on Ihe Run Kas Dis 39.-/59.- DM 
3 Movie Kas Dis 35.-759,— DM 

'1 Uiglil Sh ade Kas Dis 35.-Z49,— DM 

5 Nexor Kas Dis 36.-759.— DM 

6 Pacilic Kas D.'S 39. —759.— DM 

1 Pmg Pong Kas Dis 35.-749.- DM 

8 Pro Tennis Kas D'S 39,-759 — DM 

9 Rockn Wresllo Kas 29,- DM 

10 Room Ten Kas /Dis 35,-759,— DM 

*1 Saboteur KasiDis 39,-/59,- DM 

'2 Soccci Kas /Dis 39,-759.— DM 

13 Thmg nn a Swing Kas -Dis 29,-749,— DM 

14 Toad Runncr Kas Dis 39.-759.- DM 

15 Wmieigames Kas Dis 39,-759.- OM 


Das Neueste vom Neuesten 


1 Cerberus Kas 

2 Dan Dare Kas/Dis 

3 Guzzler Kas 

4 impossible Mission 

5 Johnny Reb II Kas/Dis 

6 Mermaid Madness 
Kas /Dis 

7 Night Rider Kas 


9.90 DM 
39,-749 - DM 

9.90 DM 
39,-/49.- DM 
39,-749 - DM 

39.-749,- DM 
35,- DM 


8 Ouesior Kas 

9 Space Shattle Kas /Dis 

10 Split Personalities 
Kas 'Dis 

11 Speedking Kas 

12 Stainless Stell Kas 'Dis 

13 Storni Kas 

14 Wanted Gunlnght 


36.- DM 
39 -/59 - D 


39,-/59,- DM 
9,90 DM 
29 -/49 - DM 
9,90 DM 
39,-759.- DM 



/Grafpad II 


• Auflösung: 1280 x 1024 Bildpunkte 

• Abwerchung: + 1 Pixel 

• Zeichenfläche: DIN A4 

• hochauflösende Graph k 

• Schaltungsdiagramme 

• CAD 

• Abmessungen: 350 x 260 x 12 mm 

• Optionswahl 

• Formeingabe 

• Bilderspeicherung und Abruf 

• Preis für 464. 664 278. 

• Preis für 6128 298 

• Anschlußadapter! 464-3 u 512S 48. 

• mit deutschem Handbuch 
Fordern Sie kostenlosen Prospekt an! 
Sie werden begeistert sein 1 
GRAFPAD III für Joyce/PC 548, 



Gerdes-Maus 

Mil leistungsfähiger Software 

1 Basic Erweiterung (60 Befehle) 

2 Cenlaur Gralikverarbetlung 

3 Kurze Programmbeschreibung 

große Leistung 

Anschluß durch JoysticXport mittels eines mil- 
gelielerlen Interfaces Hervorragende genaue 
ste Technik 

Mil dt Handbuch 228,— 


Unser neuer Schaltungs-Service für Schneider Besitzer 

(aufwendig, sehr umfangreiche Dokumentation) 


CPC 464 - 664 - 6128 
PCW8256 - 8512 - CTM 644 
CTV1640 - GT64/65 


je 15,- DM 
je 15,- DM 
je 12,- DM 


«HEUHElTEfrflEUHEITEw 

Die Sensation auf dem Softwaremarkt!!! 

Unser Publik-Domain-Service 
Speziell für Sie !!! 

Ca lOOO Programme auf 256 Disketten warten aut Ihren Einsatz!! 
Bestehend aus amerikanischen, englischen sowie deutschen 
CP/M Programmen für Ihren CPC 6128 und Joyce Unter anderem 
sind dabei: 

Assembler- 

- Pascal Compiler 

- C Compiler 

- Forth 

- Lisp 

- Etliche dBase 
Programme 

- Tips & Tricks 
für dBase 

Dies ist nur ein kleiner Ausschnitt aus unserem reichhaltigen An 
gebot Der Gesamtprogrammkatalog (lOOO Prg ) wird bei der Er 
stbestellung mitgeliefert ! 

Jede Diskette (3", 3,5“, 5 1/4") 20, - DM 


Disassembler 

- Diskettenmonitor 

- Z 80Assembler 

- Massenweise Utilities 

- Squeeze (komprimiert 

bis 60% Ihrer Textdatei) 
Texteüitor 


Alles für den Joyce 


Software für Joyce 

C-Basic-Comüifer 

169 — 

Hardware betreffend Joyce 



Smal C 

LocoScripr (Kurzanl m Disc) 

99.— 
2950 

Jovce PCW 8266 



Prompt (Daleiverwaitung) 

69 — 

Joyce PCW 8512 



Prompt-Druck 

39- 

AMX-Mouse 

298 — 


(Adressaufkl. Serienbriefe) 

9.— 

Farbband Drucker 

29,90 


Mica 

199 — 

RAM Erweiterung 256K 

149.— 


RH-Dat 

89 — 

1 MB Laufwerk (f Joyce 8256) 

698 


Turbo Adress 

149 — 

Bildschirmfiller (Slendschutz) 

89- 


Turbo Adr-^o uoyce 8512 

169- 

Parallel Seriellschnitlsielle 

148.— 


T'rbo Faktum 

199 — 

SA 1 Sprachsynthesizer 

148.- 


Verbenlrainer 

59 — 

X-Modul 464 664 6128 

296 — 


Vokabeltramer 

69 — 




Dr Draw 

199.—, 


. Graph 


144. 


»Unsere Special Adventure« 
Der Diamant von Rabenfels 
Reise durch Zeit 
Sherlock Holmes 
Auftrag in der Bronx 
Drachenland 
Die Insel der Smaragde 
Das Pharaonengrab 
Ruan 
ie Aovcnlufc 

C7D DM 39, - 749, -. 



Fl S 3,5' oder 5 1/4 708 KB Laufwerk 
bzw. Ml S 3.5" 

oder 5 1/4“ 708 KB Laufwerk 998,- DM 

Fl D 3,5' oder 5 1/4" 1.4 MB Laufwerk 
bzw. Ml D 3,5“ oder 

5 1/4“ 1,4 MB Laufwerk 1.498.- DM 

Ml X 3.5" Laufwerk + X Modul = 88 KB 
bzw Fl X 5 1/4'laufwerk + 

X-Modul - 88 KB 758,- DM 

Ml XRS 3,5' Laufwerk + RS 232 
bzw Fl XRS 5 1/4' Laufwerk 


+ RS 232 

20 MB Harddisk + 
08 KB Laufwerk 

WD 20 Subsystem 
ohne Laufwerk 


858.- DM 


3.298 - DM 


2.998,- DM 

SP 256 Speichererweiferung 298,- DM 
SP 512 Speichererweiferung 398,- DM 


Software für Joyce 


'Ärensv'iföailnrp 

199 

dBase ii 

199 

Wordstar 

199 

Mulliylan 

199 

Rohren (AdTss Artikel raklum) 

178 

T iDUKinc iFirarzdJCiihahi.ngt 

136 

FaUure—• 

9fi 

Laoe'dsle 

68 

Adressverfflil mg 

98 

Headline 

'98 

Im so Pasca 

22b 

im oo löolüo« 'ulor 

125 105 

Farlini 10 (FaUhMi 

R3 

Faktum 30 lAos Ad Tai-Iura) 

298 


f 3 Senden Sie mir bitte unverbindlich Ihren 

CPC-Katalog zu. 

O Hiermit bestelle ich per Nachnahme: 


SV *6*. HMnurw* 
PU Ol 


















































































I Bericht 




oder ein Computerkünstler seine 
Grafiken zu Weihnachten verschen¬ 
ken will, oder der Spielefreak einen 
Beweis dafür braucht, daß er die 500. 
Screen seines Lieblingsspieis erreicht 
hat... 

Bildschirmfotos sind nicht jeder¬ 
manns Sache, aber mit COPY-SHOP 
ist das alles kein Problem. Weiterhin 
kann zum Beispiel ein Schachspieler 
mit einem Schachprogramm und 
COPY-SHOP Stellungsdiagramme 
ausdrucken und archivieren, das 
habe ich bereits probiert, mit dem 
Freezer geht das prächtig. Besonders 
die 3D-Screens aus Cyrus sehen 
ziemlich gut aus... also, ich glaube, für 
COPY-SHOP kann man sich wirk¬ 
lich einen Haufen Anwendungen 
ausdenken. 

CPC: 

Für uns bleibt zu hoffen, daß COPY¬ 
SHOP gut läuft und damit den Autor 
zu weiteren Projekten ermutigt. Und 
jetzt noch ein paar Fragen zu dem 
„Software-Experiment'’. Wie ist 
eigentlich die Idee für diese Serie 
entstanden? 

M. Uphoff: 

Ja, ich hatte da eine Reihe Pro¬ 
gramme, die entweder schon fertig 
waren oder für die zumindest ein Ent¬ 
wurf vorlag, und für die habe ich 
einen gemeinsamen Rahmen ge¬ 
sucht. Programme so einfach als 
Listing mit einer knappen Bedie¬ 
nungsanleitung zu veröffentlichen, 
finde ich irgendwie unbefriedigend. 
Das Interessante ist ja oft nicht was 
die Programme machen, sondern die 
Idee, die dahinter steht, und wie sie 
realisiert wird. Der Computer ist für 
mich eine Art Experimentierfläche, 
das heißt, wenn ich eine Idee habe 
oder irgendwo was Interessantes lese, 
kann ich mir von der Maschine zei¬ 
gen lassen, ob das auch funktioniert. 
Das Experiment allein ist für jemand 
anderen natürlich nur noch halb so 
reizvoll, wenn er die Idee dahinter 
nicht erfährt. 

CPC: 

Welche Leser willst du mit dieser 
Serie ansprechen? Für wen ist das 
Software-Experiment gedacht? 

M. Uphoff: 

Ich glaube, für alle CPC-Besitzer, die 
auch kreativ mit ihrer Maschine ar¬ 
beiten, also sich gerne Sachen aus¬ 
denken und selbst programmieren. 
Man muß sich mal vergegenwärtigen, 
daß der Computer die erste Maschine 
ist, die in ihrer Funktion nicht von 
vornherein festgelegt ist, sondern 


einen Freiraum bietet, den der Benut¬ 
zer ausfüllen kann, indem er sich 
zum Beispiel selber seine Schreib¬ 
maschine, sein Musikinstrument, 
sein Grafikgerät, seinen Schachrobo¬ 
ter oder was auch immer bastelt. 
Sowas spornt natürlich die Kreativi¬ 
tät an, und ich finde es enorm, wie 
stark die Leute auf die Möglichkeit 
reagieren. Die Artikelserie geht auf 
diese Entwicklung ein, indem sie inter¬ 
essante Algorithmen vorstellt, Soft- 
ware-Know-How vermittelt und Anre¬ 
gungen gibt. 

CPC: 

Und wie bist du an das Know-How 
gekommen? 

M. Uphoff: 

Ach, das hat sich eigentlich immer 
irgendwie ergeben. Wenn die Idee erst 
mal da war, habe ich meistens früher 
oder später Material dazu gefunden, 
also Programme mit einem ähnlichen 
Thema oder Literatur. Oft haben sich 
auch während der Ausarbeitung der 
Programme Erkenntnisse ergeben, die 
ich dann später irgendwo bestätigt ge¬ 
funden habe... die Aufgabe war ei¬ 
gentlich immer nur, das alles in ein 
Konzept einzuordnen und dem Leser 
in geschlossener Form zu präsen¬ 
tieren. 

Ein gutes Beispiel dafür, wie sich eine 
Idee fast von alleine realisiert, war 
jetzt die Sache mit dem GSX. Ich 
hatte schon seit einiger Zeit die Vor¬ 
stellung, man müßte das Mallard- 
BASIC beim Joyce um Grafik er¬ 
weitern, und wollte eigentlich selber 
so ein kleines Betriebssystem dafür 
schreiben. Doch niemand konnte mir 
verraten, wie man an den Bildschirm¬ 
speicher herankommt. Okay, dann 
lag die Idee erst mal auf Eis, und jetzt 
komm' ich nach Eschwege und treffe 
ausgerechnet hier Martin Schlöter, 
der fünf Minuten von mir entfernt 
wohnt, gerade eine Dokumentation 
für PASCAL International über GSX 
macht und einer der wenigen 
Programmierer in Deutschland ist, 
die von diesem Thema überhaupt 
Ahnung haben - soll man da noch an 
Zufall glauben? 

CPC: 

Was uns und unsere Leser wohl am 
meisten interessiert, ist die Frage 
nach zukünftigen Projekten. Gibt es 
jetzt vorrangig was für den Joyce? 

M. Uphoff: 

Wohl kaum. So besonders fasziniert 
mich dieser Computer auch wieder 
nicht, ohne Farben, ohne Töne, und 
Grafik nur über Umwege - irgendwie 


sehr unsinnlich, diese Maschine. Vor 
einiger Zeit habe ich einen Leserbrief 
in CPC International gefunden, wo 
sich jemand beklagte, daß für den 
Joyce keine Spiele erhältlich seien. 
Ich habe dann über das Problem 
nachgedacht und festgestellt, daß 
sich zwei der strategischen Spiele aus 
dem Software-Experiment mit ver¬ 
tretbarem Aufwand umsetzen lassen. 
Dabei fehlten mir dann die Gra¬ 
fikmöglichkeiten, was die Idee mit 
dem GSX nach sich zog - gut, dar¬ 
übermachen wir wahrscheinlich eine 
kleine Serie, aber mehr wird es für 
den Joyce vermutlich nicht geben. 
Viel interessanter ist dagegen der 
neue Schneider PC... 

CPC: 

Den hast du vorhin schon mal er¬ 
wähnt. Ist das dein neuer Traum- 
Computer? Warum nicht eine der 
vielgelobten 68000-Maschinen? 

M. Uphoff: 

Also, als Traumcomputer würde ich 
den PC nicht bezeichnen, so eine fa¬ 
natische Beziehung zur Hardware 
habe ich eigentlich nicht. 

Der Amiga und der Atari ST sind von 
der Hardware her zw'ar fortschrittli¬ 
cher, und wenn ich hauptamtlich ein 
Programmierfreak mit Pionier-Ambi¬ 
tionen wäre, würde ich mir vielleicht 
einen Amiga ins Haus stellen. Aber 
mir kommt es auch sehr auf das 
Schreiben an, und wenn ich für eine 
Schneider-Zeitschrift schreiben will, 
dann ist der Schneider PC auf jeden 
Fall das Gegebene. Nach allem, was 
ich bisher gehört und gesehen habe, 
ist das ein überzeugender Computer 
zu einem sehr guten Preis, außerdem 
interessiert mich das neue Locomo- 
tive-BASIC, und dann gibt es noch 
ein Traumprojekt... 

CPC: 

Und das wäre? 

M. Uphoff: 

Die Apfelmännchen-Grafiken mit 
640 x200 Bildpunkten. 16 Farben und 
einem 8087 Arithmetik-Koprozessor. 
Ich vermute, damit bin ich dann 
sogar noch ein Stück schneller als der 
Atari oder der Amiga! 

CPC: 

Und weitere konkrete Pläne? 

M. Uphoff: 

Zuerst mal muß die Kiste auf dem 
Tisch stehen, und dann sehen wir 
weiter. 

CPC: 

Wir danken für das Gespräch! 
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r~Serie— - 

Das Software-Experiment 

6. Folge: Der Computer lernt 

Bild 1; Das Minischach-Spielbrett 

1 
2 

3 

4 

12 3 4 



Wie in der letzten Folge deutlich 
wurde, fällt es schwer, einem Pro¬ 
gramm Intelligenz zuzusprechen, des¬ 
sen Vorgehensweise man vollständig 
durchschaut hat. Zwar spielt das 
Kalaha-Programm clever genug, um in 
den höheren Spielstufen den meisten 
Menschen überlegen zu sein, doch zu 
offensichtlich wird die Rolle des Com¬ 
puters als elektronischer Knecht, der 
nur eine Folge vorgegebener Anweisun¬ 
gen ausführt - jeder Taschenrechner 
kann schließlich besser mit Zahlen 
umgehen als ein Mensch, ohne deshalb 
als intelligent zu gelten. 

Was unseren bisherigen Programm¬ 
beispielen fehlte, war die Fähigkeit zu 
wirklich eigenständigen geistigen 
Leistungen, die sogar für den 
Programmierer zu überraschenden 
Ergebnissen führen. Zwar erwecken 
manche Programme besonders in der 
Entwicklungsphase durchaus den 
Eindruck, als ob sie über eine gehö¬ 
rige Portion Eigenleben verfügen, 
doch im allgemeinen ist das mehr auf 
die Unvollkommenheit des Program¬ 
mierers als auf maschinelle Intelli¬ 
genz zurückzuführen. Ein gründli¬ 
ches „Debugging" bereitet diesen er¬ 
sten Anzeichen einer Roboterrebellion 
meist ein schnelles Ende. 

Was dem Normalprogrammierer ein 
Greuel ist - nämlich ein Programm, 
das in Eigeninitiative Speicherin¬ 
halte oder sogar sich selbst verändert 
- gilt dagegen im Bereich der künstli¬ 
chen Intelligenz als erstrebenswertes 


Ziel. „Lernfähigkeit" heißt das 
Thema, das nach wie vor für die KI- 
Forscher eine große Herausforde¬ 
rung darstellt, und das nicht nur aus 
wissenschaftlichem Ehrgeiz. Lernende 
Programme könnten z.B. erheblich 
dazu beitragen, die enormen Kosten 
der Softwareentwicklung und -instal- 
lation zu senken, indem sie sich selb¬ 
ständig an unterschiedliche Anfor¬ 
derungen der Anwender anpassen. 
Der Programmierer stände damit 
nicht mehr vor dem Dilemma, entwe¬ 
der ein hochspezialisiertes Programm 
schreiben zu müssen, das vielleicht 
nur für eine einzige Anwendung zu 
gebrauchen ist, oder aber ein vielseiti¬ 
ges Programm, das jedoch sehr kom¬ 
pliziert und unhandlich wird. 

Trotz dieser attraktiven Aussichten 
ist die Realisierung solcher Systeme 
noch nicht besonders weit fortge¬ 
schritten. Auch wenn teilweise schon 
recht überzeugende Demonstratio¬ 
nen lernfähiger Programme existie¬ 
ren (z.B. elektronische Ratten, die von 
selbst den Weg durch ein Labyrinth 
linden), so sind die Anwendungsge¬ 
biete doch meistens noch zu „aka¬ 
demisch", um eine praktische Bedeu¬ 
tung zu gewinnen. 

Weiterhin brauchen viele dieser Ex¬ 
perimentalprogramme teure Großre¬ 
chenanlagen, um effektiv zu arbeiten, 
und auch eine gewisse psychologi¬ 
sche Hemmschwelle sollte man,nicht 
unterschätzen: Maschinen, die über 
vorgegebene Anweisungen hinaus 


Eigeninitiative entwickeln, haben 
schon etwas Unheimliches an sich - 
zahlreiche schaurige Visionen in 
Science Fiction-Romanen geben 
einen deutlichen Hinweis auf die bei 
vielen Menschen vorhandenen Äng¬ 
ste. 

Untersucht man jedoch die verschie¬ 
denen Voraussetzungen, die ein 
Programm erfüllen muß, um zumin¬ 
dest annähernd eine Lernfähigkeit 
im menschlichen Sinne zu realisie¬ 
ren, so macht sich schnell Ernüchte¬ 
rung breit. Zu kompliziert ist die Pa¬ 
lette der menschlichen Wahrneh- 
mungs- und Verarbeitungsmöglich¬ 
keiten, um sie einfach auf eine 
Maschine übertragen zu können, und 
nach dem heutigen Stand der 
Technik sind selbständig denkende 
machthungrige Roboter nach wie vor 
in den Bereich der Fiktion zu 
verweisen. 

Viel realistischer ist dagegen die Be¬ 
drohung, die von einem simplen 
Programmfehler in einem militäri¬ 
schen Abwehrsystem ausgehen kann! 


Minischach - klein, aber oho! 


Um die Möglichkeiten und Probleme 
maschineller Lernfähigkeit zu unter¬ 
suchen, dient uns in dieser Folge ein 
Mini-Schachspiel, das extra zu die¬ 
sem Zweck erfunden wurde. Das 
Spielgeschehen Findet auf einem 4x4- 
Brett statt, auf dem zu Beginn acht 
Bauern, wie in Bild 1 ersichtlich, auf¬ 
gestellt werden. 

Wie bei dem großen Original gehen 
sie jeweils einen Schritt geradeaus in 
Vorwärtsrichtung; eine andere Figur 
schlagen, können sie nur diagonal. 
Sobald ein Bauer die letzte Reihe er¬ 
reicht, verwandelt er sich in eine 
Dame, die sich in alle Richtungen be¬ 
liebig weit bewegen kann. Um die 
Zugmöglichkeiten und damit auch 
den Speicherbedarf unseres lernfähi¬ 
gen Systems nicht unnötig auszuwei¬ 
ten, wurde allerdings ein Schlag¬ 
zwang für die Damen eingeführt - 
sie müssen also eine andere Figur 
schlagen, falls sie können. 

Verloren hat ein Spieler, wenn er 
nicht mehr ziehen kann, weil er keine 
Figuren mehr besitzt oder seine Bau¬ 
ern alle blockiert sind. Die Partie gilt 
als remis, wenn vier Züge lang (zwei 
auf jeder Seite) kein Bauer bewegt 
und keine Figur geschlagen wurde. 

Zu Beginn fragt das Programm, ob 
bereits eine Datei auf Datenträger mit 
den Ergebnissen vorangegangener 
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Die 20 MB vortex-Drivecard 

.. .zum Nachrüsten, machtaus Ihrem Schneider PC 1512 
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Partien existiert. Falls ja, so wird sie 
geladen, anderenfalls führt der Rech¬ 
ner sofort seinen ersten Zug aus. 
Daß er die Partie immer beginnen 
darf, hat seinen guten Grund: In einer 
früheren Testversion spielte das 
Programm als Nachziehender nur 
mit den schwarzen Steinen und 
sorgte dabei - wie es sich für ein 
lernfähiges Programm gehört - gleich 
für eine große Überraschung. Nach¬ 
dem es eine große Anzahl saftiger 
Niederlagen eingesteckt hatte, be¬ 
hauptete es plötzlich, bereits nach 
meinem ersten Zug „Ich habe verlo¬ 
ren” und wollte um keinen Preis 
weiterspielen. 

Nicht etwa, daß mein CPC jetzt belei¬ 
digt war - er hatte nur entdeckt, daß 
der Anziehende das Spiel bei optima¬ 
ler Strategie auf jeden Fall gewinnt! 
Also wurde der Spieß umgedreht, und 
in der vorliegenden Version muß das 
Programm beweisen, daß es diesen 
Gewinnweg selbständig herausfin¬ 
den kann. 

Doch jetzt zur weiteren Bedienung: 
Sie können einen Zug eingeben, 
indem Sie den Cursor zunächst zur 
gewünschten Figur steuern und EN¬ 
TER oder COPY drücken. Begeben 
Sie sich dann mit dem Cursor zu dem 
Zielfeld; ein zweiter Druck auf die 
ENTER- oder COPY-Taste führt den 
Zug aus. Illegale Züge werden nicht 
akzeptiert, das Programm reagiert in 
diesem Fall nur mit einem Warnton. 
Beachten Sie, daß kein Bauernzug 
möglich ist, wenn Ihre Dame eine geg¬ 
nerische Figur schlagen kann! 

Wenn Sie die Frage „Noch ein Spiel” 
mit N beantworten, so schreibt das 
Programm alle bislang vorliegenden 
Erkenntnisse unter dem Namen 
”MSCHACH.DAT” auf Datenträger 
und wird danach beendet. 


Schwer von Begriff? 


Nach den ersten Partien gegen das 
Minischach-Programm scheint diese 
Frage wirklich einige Berechtigung 
zu haben. Munter verliert es bei kon¬ 
sequentem Gegenspiel eine Partie 
nach der anderen, ohne dabei bemer¬ 
kenswerte Fortschritte zu machen, 
und der Fachmann ahnt bereits, was 
hier abläuft: Die Zugauswahl erfolgt 
rein zufällig. Bei genauer Beobach¬ 
tung kann man allerdings feststellen, 
daß das Programm nie zweimal auf 
die gleiche Weise verliert. Früher 
oder später wird es auch zu Situatio¬ 
nen kommen, in denen das Pro¬ 


gramm aufgibt, bevor es endgültig 
mattgesetzt wird - es erkennt den 
unvermeidlichen Verlust bereits im 
voraus. 

Diese „Lerneffekte” werden um so 
deutlicher, je konsequenter Sie be¬ 
stimmte Varianten bevorzugen (so¬ 
weit es der Zufallsgenerator zuläßt). 
Ergänzend sei hier weiterhin be¬ 
merkt, daß das Programm seine Er¬ 
fahrungen auch auf spiegelbildliche 
(d.h. an der vertikalen Mittelachse ge¬ 
spiegelte) Situationen anwenden 
kann. Trotzdem läßt es sich nicht ver¬ 
heimlichen, daß es im Vergleich zum 
Menschen nervtötend langsam lernt. 
Daß eine Verlustpartie grundsätzlich 
nicht wiederholt wird, gibt natürlich 
etwas Hoffnung: Früher oder später 
muß sich die Spielstärke dabei ja ver¬ 
bessern - es fragt sich nur, nach wie¬ 
viel Partien. 

Im weiteren Verlauf dieser Folge wird 
noch eine Programmänderung be¬ 
sprochen werden, die Ihnen einen 
großen Teil der „Lehrtätigkeit” ab¬ 
nimmt. Bevor wir dazu kommen, soll 
jedoch genau erläutert werden, wie 
das Programm überhaupt funktio¬ 
niert, welche Ursachen seine geistige 
Trägheit h at und was beim Menschen 
anders läuft. 

Zu diesem Zweck beginnen wir mit 
der internen Darstellung des Spiel¬ 
bretts, die sehr einfach ist: Es handelt 
sich um ein Array namens b(sp,re), in 
dem folgende Werte stehen können: 
-1 — Randfeld außerhalb 

0 —» leer 

1 —» weißer Bauer 

2 —* weiße Dame 

3 — schwarzer Bauer 

4 —* schwarze Dame 

Anstatt des eigentlich nur notwendi¬ 
gen 4x4-Arrays wird also ein 6x6-Feld 
mit Umrandung benutzt, die bei der 
Untersuchung der Zugmöglichkeiten 
hilfreich ist. 

Werfen wir jetzt einen Blick auf das 
Minischach-Listing: Die Aufgabe 
des Initialisierungsteils ist im we¬ 
sentlichen nur die Dimensionierung 
verschiedener Felder und die Vorbe¬ 
reitung der Grafikelemente. Nach 
dem Spielstart ab Zeile 450 wird 
zunächst der Zugzähler zz und der 
Remiszähler rz (er überwacht die 
Einhaltung der Remisregel!) mit 0 
initialisiert und das Spielbrett b(x,y) 
mit der Anfangsverteilung belegt. 
GOSUB 1250 sorgt für die Bildschirm¬ 
ausgabe, und die Zuweisung Spie¬ 
ler^ bestimmt, daß der Rechner 
immer beginnt. Falls Sie anfangen 
wollen, muß hier spieler=2 stehen. 


Die sich aus dieser Spielversion erge¬ 
benden Dateien sollten allerdings se¬ 
parat geführt werden, da sonst auf 
lange Sicht ein "Memory full” 
droht. 

Der eigentliche Spielablauf wird in 
den Zeilen- 600 - 670 kontrolliert, 
indem abwechselnd die Unterpro¬ 
gramme "Zug Computer” und "Zug 
Gegner” aufgerufen werden. Nach 
Abschluß der Partie enthält die Va¬ 
riable erg das Spielergebnis; in Ab¬ 
hängigkeit von diesem Wert schließt 
sich eine Auswertung an, zu der wir 
später kommen. 

Zunächst werden wir noch etwas tie¬ 
fer in die Datenstrukturen des 
Programms eindringen. 


Gepackte Daten: 
Dicht an dicht 


Eines ist klar: Wer etwas lernen will, 
braucht ein gutes Gedächtnis, und 
wie man weiß, hat der Mensch deren 
sogar zwei: Ein Kurzzeit- und ein 
Langzeitgedächtnis. Diese Trennung 
ermöglicht es, selektiv zu lernen, d.h. 
nur wirklich wichtige Daten werden 
nach einer Auswertung langfristig 
bereitgehalten. 

Gerade bei einem Microcomputer 
mit begrenztem Speicherplatz ist es 
außerordentlich ratsam, dieses Ver¬ 
fahren zu kopieren - doch zunächst 
müssen wir klären, welche Daten 
überhaupt für eine Speicherung in 
Frage kommen. 

Als erstes kommen z.B. die verschie¬ 
denen Spielsituationen in Frage, die 
im Laufe der Partien auftreten; 
schließlich soll sich das Programm ja 
merken, in welchen Positionen es 
durch welche Züge gewonnen bzw. 
verloren hat Damit deuten sich aber 
auch schon die ersten Speicherplatz¬ 
sorgen an: Ein 4x4-Integerarray zur 
Darstellung des Brettes benötigt ins¬ 
gesamt 16x2 = 32 Bytes, das macht bei 
1000 verschiedenen Positionen fast 
32 KByte aus - und die kommen bei 
Minischach locker zusammen! 

Wie man sieht, empfiehlt es sich, bei 
speicherintensiven Problemen sol¬ 
che Überlegungen vor der Programm¬ 
erstellung durchzuführen, um vor 
unangenehmen Überraschungen 
sicher zu sein. 

Was also tun? Eine hilfreiche 
Technik ist das sogenannte „Packen” 
der Daten, bei der eine Art Codierung 
gesucht wird, die möglichst wenig 
Speicherplatz erfordert. Intuitiv ist 
klar, daß eine Integervariable, die 
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Zahlenwerte von -32768 bis 32767 
darstellen kann, mit einem Bereich 
von 0 bis 3 glatt unterfordert ist: Hier 
stehen insgesamt 16 Bit (mit Vorzei¬ 
chen) zur Verfügung, die noch we¬ 
sentlich mehr Informationen aufneh¬ 
men können. Da unser Spielfeld 
genau 16 Felder umfaßt, bietet es sich 
an, zunächst einmal bitweise zu ver¬ 
schlüsseln, welche von ihnen belegt 
(Bit gesetzt) oder leer sind (Bit 
zurückgesetzt). 

Die Startposition sieht dann zeilen¬ 
weise gelesen so aus: 

psnl = 1111 0000 0000 1111 

Doch das allein reicht natürlich nicht 
- zusätzlich muß noch notiert wer¬ 
den, um welche Figuren es sich han¬ 
delt. Auf dem Spielbrett sind den ver¬ 
schiedenen Figurenarten die Ziffern 
von 1 bis 4 zugeordnet: subtrahiert 
man hier den Wert 1. so ergibt sich ein 
Bereich von 0 bis 3, für dessen Dar¬ 
stellung man nur zwei Bit braucht: 

1 (w. Bauer) — 0 - 00 

2 (w. Dame) — 1 —* 01 

3 (s. Bauer) - 2 - 10 

4 ($. Dame) —* 3 —* 11 

Damit können wir die Figuren (ohne 
Berücksichtigung der Leerfelder) ein¬ 
fach in der Reihenfolge aufzählen, in 
der sie von links oben nach rechts 
unten auftreten. Da sich mit Sicher¬ 
heit nie mehr als acht Steine auf dem 
Brett tummeln, kommen wir auch 
hier mit 16 Bit aus, die für die Startpo¬ 
sition so aussehen: 

psn2 = 00 00 00 00 10 10 10 10 

Wie man sich anhand weiterer Bei¬ 
spiele vor Augen führen kann, ist die 
gesamte Spielsituation durch diese bei¬ 
den 16-Bit-Werte eindeutig erfaßt. 
Obwohl wir für die Darstellung jetzt 
nur noch 4 anstatt 32 Bytes benötigen 
(also 2 Integervariablen), gehen keine 
Informationen verloren! Der einzige 


Nachteil liegt mitunter darin, daß bei 
einer Neubearbeitung gepackter Daten 
diese erst wieder decodiert werden 
müssen, was natürlich etwas Zeit 
kostet. 

Die praktische Realisierung des 
"Packing” zeigen die Programmzeilen 
1400 - 1520 im Rahmen des 

Unterprogramms "Zug Computer”. 
Damit es mit dem Vorzeichenbit kei¬ 
nen Ärger gibt, werden die gepackten 
Daten zunächst in Realvariablen (pl! 
und p2!) aufgenommen. Abschließend 
sorgt dann die UNT-Funktion für 
eine Umwandlung in vorzeichenbe¬ 
haftete Integerwerte (psnl und 
psn2). 

Wie Sie dem Listing entnehmen kön¬ 
nen, wird die ganze Prozedur danach 
noch einmal wiederholt, und zwar 
mit rückwärts laufendem Spaltenin¬ 
dex, wodurch die codierte Form des 
gespiegelten Bretts entsteht (psxl und 
psx2). 

Im weiteren Verlauf tritt ein kleines 
Maschinenprogramm in Aktion, 
dem neben den eben besprochenen 
Variablen noch die Startadressen 
zweier Arrays übergeben werden, die 
einen wichtigen Bestandteil des 
Langzeitgedächtnisses bilden: In 
l.psnl(i) und l.psn2(i) merkt sich das 
Programm alle entscheidenden Situa¬ 
tionen vorangegangener Partien in 
codierter Form. Die Assembler¬ 
routine schaut praktisch nur nach, ob 
die aktuelle Brettposition dort schon 
verzeichnet ist. Ist das der Fall, so 
wird in Zeile 1570 die Variable flag 
auf -1 gesetzt; i enthält dann die 
Nummer, unter der die Position ver¬ 
merkt ist. Xflag wird gesetzt, falls die 
spiegelbildliche Position gefunden 
wurde. 

Damit erfüllt unser Programm be¬ 
reits eine wesentliche Voraussetzung 
für Lernfähigkeit: Es kann sich erin¬ 


nern. Doch die Erkenntnis, daß eine 
Spielsituation schon einmal da war, 
hilft bei der Zugauswahl natürlich 
nicht weiter. Es fehlt ein Hinweis 
darauf, welche Züge sich an dieser 
Stelle bereits als günstig oder ungün¬ 
stig erwiesen haben. 


Der Zuggenerator 

Viele Programme für strategische 
Brettspiele enthalten einen soge¬ 
nannten „Zuggenerator". Dieser 
Programmteil hat die Aufgabe, eine 
Liste aller legalen Züge anzufertigen, 
aus der das Hauptprogramm dann 
seine Auswahl trifft. Weiterhin kön¬ 
nen Zuglisten für die Überprüfung 
von Eingaben benutzt werden: Ist ein 
Zug nicht in der Liste enthalten, so ist 
er illegal und wird zurückgewiesen. 
Auch unser Minischach-Programm 
enthält einen solchen Regelexperten, 
der gleich noch genauer zur Sprache 
kommt. Zunächst stellt sich aber wie¬ 
der die Frage nach einer günstigen 
Datenstruktur für die Darstellung der 
Zuglisten. Wenn Sie noch einmal 
einen Blick auf Bild 1 werfen, können 
Sie sich sofort klarmachen, daß ein 
Zug vollständig durch vier Zahlen 
von 1-4 charakterisiert ist: Von 
(Spalte, Reihe) nach (Spalte, Reihe), 
ln dem Programm sind übrigens 
grundsätzlich die Startkoordinaten 
in den Variablen sp,re und die Ziel¬ 
koordinaten in x,y enthalten. 

Wer die vorangegangenen Aus¬ 
führungen über das Packen von Da¬ 
ten aufmerksam verfolgt hat, kann 
sich hier leicht ausrechnen, daß zur 
Speicherung dieser vier Zahlen 
4x2=8 Bits (d.h. 1 Byte) vollkommen 
ausreichen; wir erhalten also pro ge¬ 
packtem Zug einen Wert von 0 - 255. 
Und jetzt ein besonderer Trick: Die¬ 
ser Wert kann ohne weiteres mit Hilfe 
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der CHR$-Funktion in ein ASCII- 
Zeichen verwandelt werden, so daß 
wir die Zugliste als String darstellen 
können! Dem Unterprogramm ab 
Zeile 2570 können Sie entnehmen, 
wie dieser Vorgang in der Praxis 
aussieht. 

Die Verarbeitung der Zugliste als 
String bietet einige handfeste Vor¬ 
teile. So weist z.B. ein Leerstring 
sofort darauf hin, daß ein Spieler ver¬ 
loren hat, da er keinen Zug mehr aus¬ 
führen kann. Weiterhin läßt sich mit 
Hilfe der INSTR-Funktion außeror¬ 
dentlich bequem feststellen, ob ein 
Zug in der Liste enthalten und damit 
legal ist. 

Auch Manipulationen durch MIDS 
und ähnliche Funktionen sind mög¬ 
lich, um z.B. als schlecht erkannte 
Züge aus einer Liste zu streichen. 
Den einzigen Nachteil dieser Me¬ 
thode werden besonders CPC 464- 
Besitzer bei vollem Speicher mitunter 
erleben, wenn der Rechner eine Gar» 
bage Collection durchführt, um seine 
Strings mitsamt unseren Zuglisten 
aufzuräumen: Er stellt zu diesem 
Zweck alle laufenden Aktivitäten ein 
und ist während der Zeit auch nicht 
weiter ansprechbar. Die Stringver¬ 
waltung des 664/6128 wurde in dieser 
Hinsicht verbessert, braucht dafür 
aber auch zwei zusätzliche Bytes 
Speicherplatz pro Stringvariable. 
Doch jetzt, wie versprochen, ein ge¬ 
nauerer Blick auf den Zuggenerator 
ab Zeile 2060. Zu Beginn wird hier 
eine Variable Seite definiert, die das 
Erstellen der Zuglisten sowohl für die 
weißen als auch für die schwarzen 
Steine ermöglicht - in Abhängigkeit 
davon, wer gerade am Zug ist. 
Danach wird das Spielfeld auf Da¬ 
men hin abgetastet, und, soweit wel¬ 
che vorhanden sind, ein Unterpro¬ 
gramm aufgerufen, das eventuell 
mögliche Schlagzüge in die Zugliste 
schreibt - sie sind ja verpflichtend! 
Deshalb geht es auch gleich zurück 
(RETURN), falls die Zugliste nach 
dieser Prozedur nicht mehr leer ist. 
Anderenfalls wird das Spielfeld noch 
einmal durchgecheckt, um Bauern¬ 
züge und nicht-schlagende Damen¬ 
züge zu registrieren. 

Die drei Unterprogramme ab Zeile 
2220 erkunden die verschiedenen Be¬ 
wegungsmöglichkeiten der Figuren. 
Für die Ermittlung der Damenzüge 
sind insbesondere zwei bereits im 
Initialisierungsteil erzeugte Arrays 
dx(ri) und dy(ri) nützlich; sie enthal¬ 
ten für alle acht Bewegungsrichtun¬ 
gen einen sogenannten Richtungs¬ 
offset, der fortlaufend zu den Koor¬ 


dinaten der Startposition addiert 
wird, bis ein Hindernis (z.B. der mit 
-1 belegte Rand) der Zugstraße ein 
Ende setzt. 

Wer einmal Minischach mit verän¬ 
derten Spielregeln probieren möchte, 
kann hier folgende Änderungen 
vornehmen: 

FOR ri=0 TO 3 

in den Zeilen 2240 und 2430 verwan¬ 
delt die Damen in Türme, und 
FOR ri=4 TO 7 
in Läufer. 


Reduzierte Zuglisten 

Kehren wir jetzt zu dem Modul "Zug 
Computer" zurück. Was passiert hier 
ab Zeile 1590, nachdem unser 
Programm mit Hilfe des Maschi¬ 
nenprogramms versucht hat, sich zu 
„erinnern”? 

Falls die aktuelle Position noch nicht 
im Langzeitgedächtnis enthalten ist, 
so wird der eben besprochene Zugge¬ 
nerator aufgerufen, um die dazuge¬ 
hörige Zugliste zu ermitteln. An¬ 
derenfalls wird eine bereits fertige 
Zuglisle l.zlisteS(i) benutzt, die eben¬ 
falls Bestandteil des Langzeitge¬ 
dächtnisses ist und - wie Sie sich 
wahrscheinlich schon denken kön¬ 
nen - um alle Züge reduziert wurde, 
die sich bei vorherigen Partien als 
verlustträchtig erwiesen haben. Sie 
enthält also nur gute Züge bzw. Züge, 
über die noch nichts bekannt ist. 
Sollte in dem einen oder anderen Fall 
eine leere Liste in Erscheinung treten, 
so weiß das Programm, daß es verlo¬ 
ren hat (erg=2), und es geht zurück 
ins Hauptprogramm. 

Ansonsten wird das Spiel jedoch mit 
einigen Eintragungen ins Kurzzeitge¬ 
dächtnis fortgesetzt, das dazu dient, 
den Ablauf einer Partie in allen Ein¬ 
zelheiten zu protokollieren. Die Va¬ 
riablenfelder beginnen alle mit k, be¬ 
nutzen den Zugzähler zz als Index 
und haben im einzelnen folgende 
Bedeutung: 
k.psnl(zz), k.psn2(zz): 

Die Brettposition vor Ausführung 
eines Zuges in gepackter Form. 
k.zliste$(zz): 

Die zur Auswahl des Zuges benutzte 

Zugliste. 

k.index(zz): 

Diese Variable erhält den Wert -1, 
falls die aktuelle Position noch nicht 
im Langzeitgedächtnis vermerkt ist; 
anderenfalls gibt sie an, unter wel¬ 
chem Index die Eintragung gefun¬ 
den wurde. 


k.znr(zz): 

Gibt die Position des gewählten 
Zuges in der Zugliste an; sie wird in 
Zeile 1670 nach einem Zufallsprinzip 
ermittelt. Falls Sie möchten, daß das 
Programm „systematisch" lernt, so 
können Sie die Zeile einfach in 
k.znr(zz)=l abändern; das Programm 
führt dann stur immer den ersten in 
der Liste vorhandenen Zug aus. 

Was nach der Eintragung ins Kurz¬ 
zeitgedächtnis passiert, ist schnell ge¬ 
klärt: Der ausgewürfelte Zug wird mit 
Hilfe von MIDS der Zugliste entnom¬ 
men, in einen Zahlenwert verwandelt 
und anschließend bitweise in vier 
Koordinaten zerlegt, mit denen das 
Unterprogramm "Zug ausführen” 
den Rest erledigt. Danach wird nur 
noch der Zugzähler zz erhöht, und es 
geht zurück ins Hauptprogramm: 
Der Gegner ist an der Reihe. 

Und damit kommen wir jetzt zu dem 
Kernstück des Programms, der Aus¬ 
wertung nach Ende einer Partie. 
Schauen wir uns zunächst an, was 
passiert, wenn der Rechner die Partie 
gewonnen hat (ab Zeile 810). Es ist 
sofort klar, daß die Zugliste, die zu der 
Position vor dem Gew'innzug gehört, 
genau auf diesen einen Zug reduziert 
werden kann - einen besseren wird 
das Programm auf keinen Fall fin¬ 
den. Die einzige Frage ist nur noch, 
ob die Position schon im Langzeitge¬ 
dächtnis vermerkt ist oder nicht. Im 
ersten Fall wird die Manipulation der 
Zugliste direkt dort vorgenommen, 
im zweiten Fall muß zunächst eine 
neue Eintragung vorgenommen und 
die Variable mp (Memory Pointer), 
die immer auf den nächsten freien 
Platz im Langzeitgedächtnis zeigt, 
um 1 erhöht werden. Es gelangen also 
nur Positionen vom Kurz- ins Lang¬ 
zeitgedächtnis, bei denen ein konkre¬ 
ter Anlaß zur Reduzierung der Zugli¬ 
ste vorliegt; für alle anderen Positio¬ 
nen können die vollständigen Listen 
ja jederzeit vom Zuggenerator er¬ 
zeugt werden. 

Der Memory-Pointer, d.h. die Anzahl 
der bereits gespeicherten Positionen 
und Zuglisten, wird übrigens laufend 
in der linken oberen Bildschirmecke 
angezeigt. Sollte er sich bedrohlich 
dem Wert 2000 nähern, so müssen Sie 
vorsorglich die Dimensionierung des 
Langzeitgedächtnisses in Zeile 150 
erhöhen. 

Etwas komplizierter ist die Auswer¬ 
tung, falls der Rechner eine Partie 
verliert (ab Zeile 870). Klar ist sofort, 
daß der letzte Zug aus der Zugliste eli¬ 
miniert werden muß, doch dabei 
kann ein Spezialfall auftreten. Falls 
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JOYCE-HARDWARE: 


DISKETTEN: 


Schneider PCW 8256 Joyce 1 548,— DM 

Schneider PCW 8512 Joyce plus 2 098.— DM 

RAM-Erweiterung für Joyce PCW 8256: 
Speichererweiterung von 256KB (die Kapazität der RAM- 
Disk wird unter CP/M auf 368KB mehr als verdreifacht!) 
8x256 Kbit-Original-Bausteinewie im Gerät Mit ausführli¬ 
cher Einbauanleitung Preis: 109.— DM 

FD-2 (2. Laufwerk für Joyce PCW 8256): 

Kapazität 2x80 Spuren mit insgesamt 1MB unformatiert 
(706 KB formatiert) Zwei Sch reib-Lese-Köpfe Komplettmit 
ausführlicher Einbauanleitung in transportsicherer Styro¬ 
por-Verpackung Preis: 579.— DM 

Schnittsteilen-Interface: 

Mit diesem Interface haben Sie endlich eine 8-Bit Centro¬ 
nics- und eine serielle RS-232-Schnittstelle CPS 8256 
Schnittstelle Seriell/Parallel. Preis: 139,— DM 

Bildschirmfilter für Joyce-Monitor Reduziert Flimmern 
und störende Spiegelungen Preis: 79,— DM 

Farbband für Joyce-Drucker Preis: 24,80 DM 

Joyce-Drucker Verlängerungskabel: 

Inklusive Stromverlängerungskabel 59,— DM 

Papierführung Joyce: Ersetzt die vorhandene „Klappe" 
Durch den verstellbaren Seiten-Anschiag ist ein gerader 
Papiereinzug und genaue seitliche Einstellung vom Druck- 
Anfang möglich Preis: 37,— DM 

Disketten: 

5 Stück CF-2 DD (für Megabyte-Laufwerk) 99,— DM 


DFÜ (Datenfernübertragung): 

VORTEX-VAK-300: 

Ubertragungsgeschwindigkeit: 300 Baud 
Orginate-/Answermodus 

Stromversorgung: 9 V Blockbatterie/externes Netzteil 
Preis: 198,—DM 

VORTEX-Phono-Set - bestehend aus: 
AkkustikkopplerVORTEX-VAK-300, Schnittstelle VORTEX- 
RS-232, Netzteil zur Stromversorgung, Diskettensoftware 
und Verbindungskabel. Ihr Vorteil: Alles aus einer Hand, 
d h keine Kompatibilitätsprobleme. Nurauspackenundan- 
schließen und „datenfernübertragen" 

SONDERPREIS: 498,— DM 

Multi-Link-Kabel: 

Durch DIP-Schalter programmierbares RS-232 Kabel Löst 
95% aller möglichen Verbindungen Kabellänge: 2 Meter 
Stecker/Stecker Preis: 69,90 DM 


VERBINDUNGSKABEL: 


Druckerkabel: 

für CPC 464,664 (2 m Länge Flachbandkabel) 44,— DM 
für CPC 6128 (2 m Länge Rachbandkabel) 44,— DM 

für CPC 6128 (1,5 m Länge Rundkabel) 49,— DM 

Akkustikkopplerkabel (zw RS 232 u Modem) 1,5 m 49,50 DM 
Anschlußkabel: 2. Floppy an CPC 664 44,50 DM 

Anschlußkabel: 2 Roppy an CPC 6128 44,50 DM 

Monitorverlängerung für CPC 464 22,90 DM 

Monitorverlängerung für CPC 664 u 6128 28,90 DM 

Joystickverlängerung für 1 Joystick (2 m Länge) 14,90 DM 
Recorderanschluß (CPC an 5-pol DIN Buchse) 17,90 DM 
Recorderanschluß (CPC an Klinken buchse) 17,90 DM 

CPC-Stereokabei zum Anschluß an HiFI-Anlage 15,90 DM 


5'A" VORTEX-DISK DS/DD 96 tpi 10 Stk. 59,—DM 
3 Vi" VORTEX-DISK DS/DD 135 tpi 10 Stk 69,— DM 
3 " DISK CF-2 5 Stk /10 Stk 49,90/89,— DM 

3" DISK CF-2 DD (Joyce 8512) 5 Stk 99,—DM 

DRUCKER: 

Typenraddrucker VORTEX-2000 998,— DM 

Panasonic KX-P1080 (siehe Datenblatt) 598,— DM 
Panasonic KX-P1092 NLQ (siehe Datenblatt) 998,— DM 
Microline ML182 (mit Centr.-Schnittstelle) 898,— DM 
Okimate 20 (Farbdrucker) 698,— DM 



SUPERPREIS - SUPERPREIS - SUPERPREIS 


OKIDATA Microline ML192 Plus 

mit Einzelblatteinzug 1 499,— DM 

Auch für andere OKIDATA-Drucker haben wir für Sie 
Sonderpakete zusammengestellt Rufen Sie uns an Es 
lohnt sich Abgabe nur solange Vorrat reicht!!! 

Centronics GLP (baugleich Schneider NLQ 401) mit 
Near-Letter-Quality Unser Weihnachtspreis: 399,— DM 
ACHTUNG: Bei Bestellungen bis 31 12 86 wird die Trak¬ 
torführung kostenlos mitgeliefert 



DRUCKERZUBEHÖR: 

Druckerständer: 

Papierzuführung wahlweise von unten oder hinten, sehr 
stabile Ausführung, Nutzfläche: 40 x 32 cm. Preis: 55,— DM 

Traktorführung: 

Zur problemlosen Verarbeitung von Endlos-EDV-Papier 
Für Schneider NLQ 401: 69,90 DM 

Für Okidata ML 182/192: 79,—DM 


PFLEGEMITTEL: 

ORIGINAL VORTEX-ABDECKHAUBEN: 

Schulzen Sie nicht nur Ihre Schneider-, sondern auch Ihre 
VORTEX-Hardware vor Verschmutzung; 


Schneider Floppy DDI-1 16,80 DM 

VORTEX Roppy Fl-So F1-D 19,80DM 

Schneider Konsole für 464 u 664 19,80 DM 

Schneider Konsole für 6128 19,80 DM 

VORTEX Roppy Fl-Xu M1-X 19,80DM 

Schneider Monitor grün 24,80 DM 

Schneider Monitor color 26,80 DM 

Schneider NLQ 401 19,80 DM 

Schneider DMP 2000 22,80 DM 

VORTEX Winchesterlaufwerk WD-20 19,80 DM 


Reinigen Sie Ihr 5’A" Laufwerk mit unserem speziellen Roi- 
nigungsset: 5'A" Kopfreinigungsdiskette: 24,95 DM 

Azimuth: Ein Programm zur genauen Einstellung Ihres Kas¬ 
settenrecorders am CPC 464 Kein Read Error mehr durch 
einen verstellten Tonkopf Mit Schraubenzieher und einem 
Testspiel. Preis 39,90 DM 


NEU NEU NEU NEU NEU NEU NEU NEU NEU NEU 
SOFTWARE SOFTWARE SOFTWARE SOFTWARE 


SPIELE: 


PAPERBOY 

C/D 

36,~/54,~ 

DM 

1942 

C/D 

36,—/54.— 

DM 

LIGHT FORCE 

C/O 

29,90/39.90 

DM 

BOMB JACK 

C/D 

31,-/42,90 

DM 

GHOSTN GOBLINS 

C/D 

29,90/39,90 

DM 

LEADER BOARD 

C/D 

39,--/49,— 

DM 

BAT MAN 

C/D 

29,90/42,90 

DM 

EQUINOX 

C/D 

33,90/45.— 

DM 

KNIGHT GAMES 

C/D 

34,90/49,90 

DM 

HEXENKÜCHE TEIL II 

C/D 

29,-/42,90 

DM 

IMPOSSIBLE MISSION 

C/D 

39,~/49,— 

DM 

SHOGUN 

C/D 

34,90/46,90 

DM 

MISSION ELEVATOR 

C/D 

35,90/59,— 

DM 

GOONIES 

C/D 

39,—/59,— 

DM 

REBEL PLANET 

C/D 

36,90/59,— 

DM 

QUESTPROBE 

C/D 

36,90/59,— 

DM 

INTERNATIONAL KARATE 

C/D 

29,90/39,90 

DM 

STREET HAWK 

C/D 

34,90/59,— 

DM 

EDEN BLUES (DOOMSDAY BLUES) 

C/D 

19,90/44,90 

DM 

CRAFTON & XUNK (GET DEXTER) 

C/D 

19,90/44,90 

DM 

MELTDOWN 

C/D 

27,90/34,90 

DM 

WANTED GUNFRIGHT 

C/D 

39,~/59,~ 

DM 

JACK THE NIPPER 

C/D 

31,90/48,90 

DM 

GLADIATOR 

C/D 

39,90/54,90 

DM 

MANDRAGORE 

C/D 

39,90/49,90 

DM 

NEXUS 

C/D 

35,90/48,90 

DM 

NIGHT GUNNER 

C/D 

29,-/46,90 

DM 

PACIFIC 

C/D 

33,90/46,90 

DM 

RESCUEONFRACTALUS 

C/D 

35,90/48,90 

DM 

DAN DARE 

C/D 

32,90/42,90 

DM 

GLASS 

C/D 

19,90/34,90 

DM 

NUCLEAR DEFENCE 

C/D 

29,90/39,90 

DM 

DOOMSDARK REVENGE 

C 

32,90 

DM 

QUESTOR 

D 

42,90 

DM 

ACTIVATOR 

D 

42,90 

DM 

TEMPEST 

C/D 

36,—/48 — 

DM 

GALVAN 

C 

32,90 

DM 

DRWHO 

C/D 

32,90/44,90 

DM 

TRAP DOOR 

C 

29,90 

DM 

BOBBY BEARING 

C/D 

32,90/48,— 

DM 

GLIDER RIDER 

C 

29,90 

DM 

DRUID 

C 

27,— 

DM 

TYJAD 

D 

47,90 

DM 

FROST BYTE 

C 

29,90 

DM 


ANWENDUNGEN: 

Bei Bestellung bitte Rechnertyp und Diskettenformat ange¬ 
ben: 

ACB (Arcade Construction Set): 

siehe Test CPC 9/86 für CPC 464 (Cas): 44,90 DM 

d'Base II, Wordstar, Multiplan je 198,— DM 

Turbo Pascal 3 0 219,— DM 

Turbo Pascal 3 0 (m Graphikunterstützung) 279,— DM 
Turbo-Lader-Grundpaket 125,— DM 

Turbo-Lader Business 148,— DM 

Turbo-Lader Sience 189,— DM 


Selbstverständlich erhalten Sie über den VORTEX-Versand-Service auch alle VORTEX-Produkte 


VORTEX-Monitorständer: Dreh- und schwenkbar in allen 
Richtungen Für alle 12" Monitore Solide Ausführung aus 
bruchfestem Kunststoff Preis: 39,90 DM 

| 

1 

1 

O Senden Sie mir Ihren Katalog (Schutzgebühr DM 3,-, bei Bestellung ab DM 100,- frei) 

O Senden Sie mir umgehend folgende Artikel aus Ihrem Angebot: 

O per Nachnahme O per Euro-Scheck 

DM 

Monitorentspiegelungsspray: Beseitigen Sie lästige Re- 

1 

1 


DM 

entlastet Auch für andere Anwendungen geeignet wie z.B : 
Bilderglas, Autoarmaturen, Fernsehgeräte und ähnliche 
optische Anwendungen Siehe Sonderprospekt 

Preis: 29,90 DM 

Bildschirmfilter: Vorsatz-Filter, reduziert störende Spiege- 

1 


DM 

1 


DM 

I 


DM 

lungen und Flimmern, wird mit einem Klebeband-Klettver¬ 
schluß am Gehäuse befestigt. Filter aus Gewebe auf Kunst- 

| 


DM 

Stoff rahmen 

Für Farbmonitor CTM 640/644: 79,— DM 

1 



Für Grünmonitor GT 64/65 (bis 12/85) 59,— DM 

Datenrecorder: Zum Laden und Speichern von Kassetten¬ 
software auf dem CPC 664 und CPC 6128 Im Preis ist das Da- 
tenübertragungs- und das Netzkabel enthalten Auch für 
Batteriebetrieb geeignet und als normaler Musikrecorder 
verwendbar Preis: 89,— DM 

1 



1 



1 

1 

Telefon-Nr Unterschrift 



Alle Lieferungen erfolgen auf Grund unserer Allgemeinen Geschäftsbedingungen 
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dieser Zug der einzige in der Liste ist, 
d.h. keine Alternativzüge mehr übrig 
bleiben, so heißt das automatisch, 
daß auch der vorherige Zug des Rech¬ 
ners als Verlustzug zu betrachten ist - 
er führt ja, falls der Gegner es will, zu 
einer Position mit einer leeren 
Zugliste! 

Ist dann der vorherige Zug ebenfalls 
ohne Alternative, so muß die Auswer¬ 
tung auf den vorvorigen Zug ausge¬ 
dehnt werden usw. 

Auf diese Weise kann es passieren, 
daß durch einen einzigen Partiever¬ 
lust ganze Zugfolgen bis hin zum 
Partieanfang eliminiert werden. 

Zum Abschluß bleibt noch, welche 
Auswertung bei einem Remis in 
Frage kommt. Entscheidend ist 
dabei, ob das Programm lernen soll, 
zu gewinnen oder nicht zu verlieren - 
im ersten Fall muß das gleiche Ver¬ 
fahren wie bei einer Verlustpartie an¬ 
gewendet, im zweiten Fall dagegen 
die Auswertung der gewonnenen 
Spiele übernommen werden. Im 
Programm wurde ein weiser Kom¬ 
promiß geschlossen - es findet über¬ 
haupt keine Auswertung statt! Wenn 
Sie wollen, können Sie aber durch ein 
entsprechendes GOTO in Zeile 940 
die Remis-Routine über die eine oder 
andere Auswertung umleiten. 


Der programmierte 
kleine Bruder 


Damit haben Sie nun alle für das 
Lernverhalten des Rechners wichti¬ 
gen Programmteile kennengelernt, 
und wir werden uns jetzt der Frage 
zuwenden, warum der Lernvorgang 
vergleichsweise langsam stattfindet, 
obwohl sich in der Datenstruktur 
durchaus Parallelen zum menschli¬ 
chen Gedächtnis finden lassen. Doch 
mit dem Speichern von Positionen 
und Eliminieren von Verlustzügen ist 
es offensichtlich nicht getan. 
Insbesondere besitzt der Mensch 
zusätzlich die Fähigkeit, aus seinen 
Erfahrungen allgemeine Regeln ab¬ 
zuleiten, wie z.B. 

„Es ist schlecht, wenn der Gegner eine 
Dame erhält”, 

und kann die Regeln auch wieder auf 
konkrete Spielsituationen anwenden. 
Es liegt auf der Hand, daß diese Fä¬ 
higkeit einen Lernvorgang außeror¬ 
dentlich beschleunigt, da die bereits 
gewonnenen Erfahrungen auch auf 
Situationen angewendet werden kön¬ 
nen, die bislang noch nicht aufgetre¬ 
ten sind. 


Damit berühren wir ein Gebiet, mit 
dem Elektronengehirne so ihre 
Schwierigkeiten haben Regeln, wie 
das obige Beispiel, werden im allge¬ 
meinen durch Bewertungsfunktio¬ 
nen erfaßt (siehe Folge 4); daraus re¬ 
sultiert praktisch die Forderung nach 
einem Programm, das im Verlauf des 
Lernvorgangs die Bewertungsfunktion 
oder zumindest die Gewichtsfakto¬ 
ren einer vorgegebenen Formel selbst 
verändert. Doch bislang gibt es in die¬ 
ser Hinsicht kaum vorzeigbare Er¬ 
gebnisse, und die wenigen Experi¬ 
mentalprogramme kranken meist am 
gleichen Problem wie unser Beispiel: 
Sie lernen zu langsam. Zwar be¬ 
herrscht unser Programm immerhin 
eine Art der Verallgemeinerung, 
nämlich die Anwendung seines Wis¬ 
sens auf spiegelbildliche Situationen, 
doch das ist sehr wenig. 

Auf welch absurde Weise sich der 
Mangel an Abstraktionsfähigkeit be¬ 
merkbar machen kann, soll die fol¬ 
gende kurze Szene verdeutlichen: 

In tagelanger, aufopferungsvoller 
Lehrtätigkeit haben Sie das Mini¬ 
schach-Programm soweit gebracht, 
daß es allen Ihren Gemeinheiten und 
taktischen Schlichen gewachsen ist. 
Auch bei stärkstem Gegenspiel ge¬ 
lingt es kaum noch, eine Partie gegen 
den Rechner zu gewinnen. Stolz auf 
die Erfolge Ihres Schülers wollen Sie 
das Programm beenden und den ge¬ 
samten „Lerninhalt" auf Datenträger 
schreiben lassen, da stürmt Ihr klei¬ 
ner Bruder in den Raum. Spaßeshal¬ 
ber erklären Sie ihm die Regeln und 
laden ihn zu einer Partie ein. Und 
siehe da: Obwohl der Kleine oft mit 
den denkbar dümmsten Zügen ope¬ 
riert, verliert das ach so gelehrige 
Programm plötzlich wieder eine 
Partie nach der anderen. - Was ist 
passiert? 

Ganz klar - Sie haben dem Pro¬ 
gramm zwar beigebracht, wie man ge¬ 
gen einen guten, aber nicht, wie man 
gegen einen schlechten Spieler ge¬ 
winnt! Da das Programm nicht ver¬ 
allgemeinert, nützen ihm seine Er¬ 
fahrungen aus den vorherigen Par¬ 
tien überhaupt nichts, wenn der 
kleine Bruder vollkommen unbe¬ 
kannte Stellungen provoziert. Also le¬ 
gen Sie dem Knopf nahe, doch ruhig 
noch ein paar Partien zu spielen, um 
das Programm auch in dieser Bezie¬ 
hung sturmfest zu machen, doch lei¬ 
der hat der nach 10 Minuten die Nase 
voll und zieht von dannen - was 
nun? 


Doch bevor Sie in Versuchung kom¬ 
men, selber den Dummi zu spielen, 
hier ei ne bessere Lösung: Warum soll 
der Computer nicht diese Rolle über¬ 
nehmen? Das Ganze stellt überhaupt 
kein Problem dar - Sie brauchen nur 
die im Zusatzlisting angegebenen 
Zeilen zu ändern, und danach lernt 
der Computer, indem er gegen sich 
selbst spielt, eine Partie nach der an¬ 
deren! Nach Drücken von DEL wird 
das Gemetzel bei nächster Gelegen¬ 
heit abgebrochen, und das Programm 
schreibt wie gewohnt sein Langzeit¬ 
gedächtnis auf Datenträger. 

Auf den ersten Blick scheint hier wirk¬ 
lich ein alter KI-Traum (oder ein 
Trauma?) in Erfüllung zu gehen: 
Ohne menschliches Zutun erarbeitet 
sich die Maschine eine Qualifikation, 
die sie irgendwann in die Lage ver¬ 
setzen wird, sich in der Realität (d.h. 
gegen menschliche Gegner) zu be¬ 
währen. Schaut man sich jedoch an. 
was auf dem Bildschirm abläuft, so 
stehen einem die Haare zu Berge: Da 
ja beide Kontrahenten ihre Züge 
zufallsgesteuerl wählen, kommen 
kaum sinnvolle Zugfolgen zustande. 
Bei dem Führer der schwarzen Steine 
bleibt das auch so, während der Füh¬ 
rer der weißen Steine ständig dazu¬ 
lernt - er müßte also nach einer aus¬ 
reichenden Anzahl von Partien die 
Mehrzahl der Spiele gewinnen. Las¬ 
sen Sie Ihrem CPC ruhig zwei oder 
drei Nächte Zeit, und probieren Sie. 
was bei diesem Langzeitexperiment 
herauskommt. 

Das Programm des Autors operiert 
inzwischen mit einer Datei, die auf 
Disc ca. 30 KByte belegt und 1950 ge¬ 
speicherte Positionen umfaßt. Damit 
gewinnt es in der Tat die meisten Par¬ 
tien gegen den „kleinen Bruder", und 
auch erfahrenere Gegner werden 
mitunter schon deutlich abserviert. 
Entstanden ist die Datei in einigen 
harten Lehrstunden und durchrech¬ 
neten Nächten - die Kombination bei¬ 
der Methoden hat sich als recht 
sinnvoll erwiesen. Trotzdem sollte 
man nicht verschweigen, daß das 
Programm in der vorliegenden Form 
von seiner Leistungsfähigkeit her 
kaum als befriedigend bezeichnet 
werden kann. Die Erwartungen, die 
bei der Planung in das Projekt gesetzt 
wurden, erfüllt es nur teilweise - aber 
trotzdem gab es gute Gründe, es im 
„Software-Experiment" vorzustellen: 
Einerseits demonstriert es interes¬ 
sante Programmiertechniken (z.B. 
gepackte Daten, Zuggenerator), die 
auch bei anderen Gelegenheiten 
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nützlich werden können; anderer¬ 
seits ist es ja möglich, daß der eine 
oder andere Leser noch eine Idee hat, 
wie man die Lernfähigkeit des 
Programms verbessern kann. 
Weiterhin noch ein Wort an die 
Joyce-Besitzer: Leider ist es wegen 
des erforderlichen Aufwands an Zeit 
und Druckseiten nicht immer mög¬ 
lich, eine Joyce-Version unserer 
Programme zu entwickeln - insbe¬ 
sondere, da zur Zeit ein anderes Pro¬ 
jekt im Vordergrund steht (Grafik mit 


Mallard-BASIC). Aber vielleicht fin¬ 
det sich ein Joyce-Besitzer, den diese 
Aufgabe reizt, so daß wir die Umset¬ 
zung bei Gelegenheit per Databox 
nachreichen können. Die ausführli¬ 
che Programmbeschreibung gibt 
dabei sicherlich einige Hilfen; ganze 
Programmteile wie z.B. der Zuggene¬ 
rator können ohne Änderung über¬ 
nommen werden. 

Bevor wir demn ächst interessante Le¬ 
serbeiträge zum „Software-Experi¬ 
ment" vorstellen. wird in der näch¬ 


sten Folge unser Thema „künstliche 
Intelligenz und strategische Spiele" 
mit einem Programm seinen krönen¬ 
den Abschluß finden, das ebenfalls 
lernfähig ist und seine Erfolge mit 
wissenschaftlicher Methodik erzielt 
(Induktion bzw. Deduktion); d.h. 
eigentlich tut es nur so als ob, aber das 
derart überzeugend, daß es einem 
dabei mitunter die Sprache ver¬ 
schlägt - Sie dürfen gespannt sein! 

(Matthias Uphof!) 


45 '##*** Modifikation "Kleiner Bruder” £28043 

46 ’ C117 3 

730 1F INKEY $ =CHR$(127) THEN GOSUB 1070:CL C3156J 
S:END ELSE 450 

1780 ’«*»****»** Zug Gegner V2 17691 

1790 ' [1171 

1800 GOSUB 2060 'Zugliste holen C17433 

1810 1F zliste$="" THEN er g = l:RETURN 123863 

1820 zug=ASC(MID$(zliste$, 1 NT(RND#L£N(zlis 144813 
te$)+1) ) ) 

1830 sp=(zug AND &iC0)\64+l:re=(zug AND &30 £18333 
) \ 16+1 

1840 x=(zug AND &iC)\4 + l :y = (zug AND 3> + l 119243 

1850 GOSUB 1170 'Zug ausfuehren 116073 

1860 RETURN £5553 

10 ’**###**#**#**#**#«******#***##«»**# 114603 

20 ’««#***#*»# Mini - Schach #**##**«#* 116153 

30 ’***## (c) 1986 Matthias Uphoff *«## 114243 

40 '*#*****#*#########*******#«######## 114603 

50 ’ 11173 

60 '»»»»»fc##«* Initialisierung 129983 

70 ’ 11173 

80 IF HIMEM>40000 THEN GOSUB 2630 112063 

90 OPENOUT"x”:MEMORY H1MEM-1:CLOSEOUT £29363 

100 MODE 1 15063 

110 INK 0,0:INK 1,9:1NK 2,15:INK 3,23:B0RD 121163 
ER 3 

120 WlNDOU#1,11,40,23,24 114163 

130 DEFINT a-z 15533 

140 DIM dx(7),dy(7),b(5,5> 19623 


150 D1M 1.psnl(2000),1.psn2<2000),1.zllste 125893 
$( 2000 ) 

160 DIM k.psnl(20),k.psn2(20),k.zliste$(20 135373 
),k.znr(20),k. index(20 > 


170 PRINT 13613 

180 PRINT"Wurde bereits eine Datei erstell 137373 
t (j/n>?" 

190 a$ = LOUER$(INKEY$ ) 19603 

200 IF a$="j" THEN GOSUB 960 ELSE IF a$<>" £29153 
nr THEN 190 

210 CLS 1913 

220 SYMBOL 240', 0,0,0,3, 7,7,3, 14 119103 

230 SYMBOL 241,0,0,0,192,224,224,192,112 124003 

240 SYMBOL 242,3,3,3,7,12,31,15,0 117643 

250 SYMBOL 243,192,192,192,224,48,248,240, 124013 
0 

260 SYMBOL 244,8,0,2i,31,3i,27,12,7 120033 

270 SYMBOL 245,0,0,168,248,248,216,48,224 122493 

280 SYMBOL 246,7,7,7,15,28,63,31,0 117903 

290 SYMBOL 247,224,224,224,240,S6,252,248, 120543 
0 

300 RESTORE 360 17393 

310 FOR 1=0 TO 7:READ dx(i):NEXT 17033 

320 FOR i=0 TO 7:READ dy(l):NEXT 18743 


330 FOR i = i TO 7:READ c:fre 1$ = frei$+CHR$(c 130773 
):NEXT 

340 FOR 1=1 TO 7:READ c:bauer$=bauer$+CHR$ 120773 
(c):NEXT 

350 FOR 1 = 1 TO 7:READ c: dame$ = dame$+CHR$(c 122363 


):NEXT 

360 DATA 0,0,-1,1,1,1,-1,-1 114983 

370 DATA 1,-1,0,0,1,-1,1,-1 110523 

380 DATA 32,32,10,8,8,32,32 19443 

390 DATA 240,241,10,8,8,242,243 19623 


400 DATA 244,245,10,8,8,246,247 112253 

410 PEN l:LOCATE 16,4:PR!NT CHR$(150)STR IN 121483 
G$(8,154)CHR$(156) 

420 FOR y = 5 TO 12-.L0CATE 16,y:PRINT CHR$(1 £33803 
49 > SPACE$(8)CHR$(149):NEXT 

430 LOCATE 16,13:PRINT CHR$(147)STRING$(8, 119663 


154)CHR$(153) 

440 ’ 11173 

450 ’*###**##*« Spielstart £15423 

460 ’ £1173 

470 zz=0:rz=0 112253 

480 RESTORE 510 17733 

490 FOR y=0 TO 5:F0R x=0 TO 5 116973 

500 READ b(x,y):NEXT x,y 112153 

510 DATA -1,-1,-1,-1,-1,-1 111583 

520 DATA -1,1,1,1,1,-1 18893 

530 DATA -1,0,0,0,0,-1 17323 

540 DATA -1,0,0,0,0,-1 17323 

550 DATA -1,3,3,3,3,-1 £7313 

560 DATA -1,-1,-1,-1,-1,-1 111583 

570 GOSUB 1250 18733 

580 spieler=l £7743 

590 ’ 11173 

600 ’»»»******* Spielablauf 111953 

610 ’ 11173 

620 erg=0 £4003 

630 WHILE erg=0 111363 

640 ON Spieler GOSUB 1380,1780 120003 

650 spleler=3-spleler 111863 

660 WEND 13903 

670 ’ £1173 

680 ’**#»»**#»# Spielende’ 112063 

690 • 11173 

700 zz=zz-l 18363 

710 ON erg GOSUB 810,870,930 18043 

720 LOCATE 1,1:PR I NT mp 16783 

730 PRINTUi,"Noch ein Spiel CJ/n) ?" 116463 

740 a$=L0WER$(INKEY$) 19603 

750 IF a$ = ”j” THEN CLS#1:G0T0 450 125903 

760 IF a$="n" THEN GOSUB 1070;CLS:END 118343 

770 GOTO 740 £4173 

780 ’ 11173 

790 '•»*•»*«•*» Auswertung 110663 

800 ’ 11173 

810 PRINT#1,"Ich habe gewonnen !" 120083 

820 IF LEN(k.zliste$(zz>)=1 THEN RETURN 132943 


830 IF k.Index(zz)>-1 THEN i=k.index(zz) E 139463 
LSE 1.psnl(mp)=k.psnl(zz):1.psn2(mp)=k.psn 
2(zz):i=mp:mp=mp+i 

840 1.zliste*<i)=MID$(k.z1iste*(zz),k.znr( 114513 
zz),1) 

850 RETURN 15553 

860 ’ 11173 

870 PRINTUI,"Ich habe verloren !" £16103 

880 IF k.Index(zz)>- 1 THEN i=k.Indextzz) E 139463 

LSE 1.psnl(mp)=k.psnl(zz):l.psn2(mp)=k.psn 
2(zz):i=mp:mp=mp+l 

890 1.zliste*(i)=LEFT$(k.z1iste$(zz),k.znr 148203 
(zz)-l)*MlD$(k.zliste$(zz),k.znr(zz)+l> 

900 IF zz>0 AND 1.zliste$(i)="" THEN zz=zz 123723 


-1:GOTO 880 

910 RETURN 15553 

920 ’ £1173 

930 PR!NT#1,, "Unentschieden !" 117703 

940 RETURN 15553 

950 ’ 11173 
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I Serie 



Alle Preise zzgl. rund 5.- DM Porto & Verpackung. Versand nur gegen Nach¬ 
nahme. Fordern Sie unseren neuen großen Gesamt-Katalog an mit einer Su¬ 
per-Auswahl für ATARI 800 ST. COMMODORE VC-20. C-16. Plus,'4, C-64. 
C-128, Amiga, IBM PC & Kompatible. MSX und Schneider CPC, Joyce PC 


Händleranfragen erwünscht! Programmierer gesucht! 

4 KINGSOFT 

UV SPITZEN - SOFTWARE 
w MADE IN GERMANY 

F. Schäfer • Schnackebusch 4 ■ 5106 Roetgen • S 02408/5119 


960 '*«#*»»»»»* Datei lesen [896] 

970 » C117] 

980 mp = 0:CLS [472] 

990 OPENIN"mschach. dat" [2754] 

1000 WH 1 LE NOT EOF [1640] 

1010 I NPUT#9, 1.psnl( mp ),1.psn2 ( mp),1.z1ist [2870] 
e*(mp) 


1020 

mp=mp+1 


[4153 

1030 

WEND 


[390J 

1040 

CLOSEIN 


[7523 

1050 

RETURN 


[5551 

1060 

* 


[117] 

1070 

’##**#**#*# Datei schreiben 


[6683 

1080 

» 


[1173 

1090 

CLS 


[913 

1100 

0PEN0UT"mschach.dat" 


[2150] 

1110 

FOR 1=0 TO mp-1 


[9213 

1 120 
< i ) 

WRITE#9,1.psnlCi),l.psn2(i),l.zliste* 

[23703 

1130 

NEXT 


[3503 

1 140 

CL0SE0UT 


[902 3 

1150 

RETURN 


[555] 

1160 

i 


[117] 

1170 

'«*«**#*»»» Zug ausfuehren 


[20243 

1180 

♦ 


[117] 

1190 IF b(sp,re)=l OR b(sp,re)=3 0R b(x, 
>0 THEN r z=0 ELSE rz=rz+l 

y) 

[32343 

1200 

IF rz>3 THEN erg=3 


[6153 

1210 

b(x,y)=b(sp,re): b (sp,re)=0 


[26913 

1220 

IF y = 4 AND b(x,y)=l THEN b(x,y)=2 


[2468] 

1230 

IF y=1 AND b(x,y)=3 THEN b(x,y)=4 


[10223 

1240 

' 


[117] 

1250 

’ * * ***« t» # Brett ausgeben 


[16953 

1260 

i 


[117] 

1270 

FOR x = 1 TO 4:FOR y = l T0 4 


[14433 

1280 

IF b(x,y)>2 THEN PEN 0 ELSE PEN 3 


[1345J 

1290 

PAPER < x +y) MOD 2 +1 


[16613 

1300 

L0CATE 15+x*2,3+y*2 


[984] 

1310 

IF b C x,y)=0 THEN PRINT frei* 


[25513 

1320 

uer * 

IF b(x,y)=1 0R b(x,y)=3 THEN PRINT 

ba 

[1579] 

1330 

me* 

IF b(x,y)=2 0R b(x,y)=4 THEN PRINT 

da 

[20843 

1340 

NEXT y, x 


[397] 

1350 

PEN 1:PAPER 0 


[9583 

1360 

RETURN 


[555 3 


1370 ’ [117] 

1380 '«*»**»#**» Zug Computer £1784] 

1390 * [117] 

1400 ’Fe 1dcodierung [1194] 

1410 pl!=0:p2!=0 [930] 

1420 FOR sp=l T0 4:F0R re=i T0 4 [2410] 

1430 pl!=pl!*2 [668] 

1440 IF b(sp,re)>0 THEN pl!=pl!+1:p2!=p2!* [2003] 

4+b(sp,re)-1 

1450 NEXT re.sp [503] 

1460 psnl B UNT< pl!):psn2=UNT(p2!) [1447] 

1470 pl!=0:p2!=0 [930] 

1480 FOR sp=4 T0 1 STEP -1:FOR re=l T0 4 [3071] 

1490 pl!=pl!«2 [668] 

1500 f F b(sp,re> >0 THEN pl!=pi! + 1:p2!=p2!» £20033 

4 + b < sp,re)-l 

1510 NEXT re,sp [503] 

1520 psx1=UNT(pl!):psx2 = UNT(p2!) £1371] 

1530 ' £117] 

1540 'Position schon im Langzeitged. ? £2195] 

1550 f1ag=0:xf1ag=0 [1810] 

1560 CALL &A600,@1.psn2 < 0),01.psnl(0),psx2 £24123 

,psxl,psn2,psnl 

1570 IF PEEK(&A66D)<255 THEN f1ag=-1:i*PEE £4732] 
K (&A66C > +256»PE5K (&A66D) :xf 1ag=PEEK<&A66E) 

1580 ’ tll7] 

1590 ’Zugllste holen [20183 

1600 IF flag THEN z 1 i ste*=1.z1iste*(i> ELS [2141] 

E G0SUB 2060 

1610 IF zliste*="" THEN erg=2:RETURN [1493] 

1620 ' [1173 

1630 'Eintragung Ins Kurzzeitged. [1957] 

1640 k. psnl(zz>=psnl:k.psn2(zz)=psn2 [24193 

1650 k.z1istet(zz)=z1iste* [15253 

1660 IF flag THEN k.1ndex<zz>=i ELSE k.lnd [3157] 

ex(zz)=-l 

1670 k.znr<zz)=INT(RND*LEN(zliste*)+l) [17753 

1680 * [117] 

1690 'Zug decodieren u. ausfuehren [2290] 

1700 zug=ASC(MlD«(zliste*,k.znr(zz))) [29653 
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1710 

IF xflag THEN zug=zug XOR &CC 

£ 2296] 

2270 

x=x+dx(ri):y=y+dy(ri> 

£2290] 

1720 

sp=(zug AND &C0)\64+i:re=(zug AND &30 

C18333 

2280 

WEND 

£390] 

) \16+1 


2290 

GOSUB 2520 'Test auf Schlagzug 

£2527] 

1730 

x = (zug AND &C)\4+1:y=(zug AND 3)+l 

C19243 

2300 

NEXT ri 

£399] 

1740 

GOSUB 1170 'Zug ausfuehren 

£ 16073 

2310 

RETURN 

£555] 

1750 

zz=zz+1 

£8243 

2320 

» 

£117] 

1760 

RETURN 

£5553 

2330 

»#*######*# Bauernzuege 

£1398] 

1770 

• 

£1173 

2340 

i 

£1173 

1780 

'**»#*****» Zug Gegner 
* 

£7453 

2350 

y=re+l-seite:x=sp 

£20323 

1790 

£1173 

2360 

IF b < x,y)=0 THEN GOSUB 2570 ’Eintragu 

£35971 

1800 

GOSUB 2060 ’Zug liste holen 

E17433 

ng ln Zug 11ste 


1810 

IF z1iste$ = "" THEN erg=1:RETURN 

£23863 

2370 

x = sp-1:GOSUB 2520 'Test auf Schlagzug 

£31593 

1820 

x=l:y=4 

£8633 

2380 

x=sp+1:GOSUB 2520 

E10623 

1830 

GOSUB 1920 ’Startkoord. holen 

£21183 

2390 

RETURN 

£5553 

1840 

IF b(x,y)<3 THEN PRINT CHR$(7):G0T0 1 

£28733 

2400 

’ 

£1173 

830 



2410 

'#*****#**« Damenzuege 

£926 3 

1850 

sp = x :re=y 

£ 1153 

2420 

* 

£ 117] 

1860 

GOSUB 1920 'Zielkoord. holen 

C14153 

2430 

FOR r1=0 TO 7 

£9563 

1870 

z=(sp-i)«64+(re-l)#16+(x-l)#4+y-l 

£24193 

2440 

x=sp+dx(rl):y=re+dy(rl) 

£20463 

1880 

IF INSTRCzlIste*,CHRt(z))=0 THEN PR IN 

t30033 

2450 

UHILE b ( x,y ) =0 

£16393 

T CHRt(7):GOTO 1830 


2460 

GOSUB 2570 'Eintragung in Zugliste 

£19263 

1890 

GOSUB 1170 ’Zug ausfuehren 

£ 16073 

2470 

x=x+dx(ri):y=y+dy(ri> 

£22903 

1900 

RETURN 

£5553 

2480 

WEND 

£390] 

1910 

* 

£1173 

2490 

NEXT rl 

£399] 

1920 

’*#**«###** Koordlnatenelngabe 

£19253 

2500 

RETURN 

£5553 

1930 

£ 1173 

2510 

’ 

£1173 

i 940 

PEN 2:a$ = "" 

£7273 

2520 

'##*##*##* Schlagzug moeglich ? 

£19703 

1950 

UHILE at OCHR* C13 > AND a$<>CHR$ ( 224 ) 

£27053 

2530 

1 

£117] 

1960 

LOCATE 15+x#2,4+y#2:CALL &BB81 

£ 18363 

2540 

IF seite=0 AND b(x,y)<>3 AND b<x,y><> 

£30783 

1970 

a$ = 1NKEY * :IF a$ = H ” THEN 1970 

£14623 

4 THEN RETURN 


1980 

CALL &BB84 

£3153 

2550 

IF sei te = 2 AND b<x,y>Oi AND b(x,y)<> 

£31083 

1990 

IF a$=CHR$(240 ) THEN y=MAX(l,y-l> 

C 710 3 

2 THEN RETURN 


2000 

IF at=CHR$<241) THEN y=MIN(4,y+l) 

£6873 

2560 

f 

£117] 

2010 

IF a$ = CHRS(242) THEN x = MAX(l,x-l) 

E12983 

2570 

*####*##** Eintragung ln Zugliste 

£28043 

2020 

IF a*=CHR$(243> THEN x=MIN(4,x+l) 

£15673 

2580 

t 

£117] 

2030 

WEND 

£3903 

2590 

zug=(sp-i)*64+(re-l)#16+(x-l)*4+y-l 

£20373 

2040 

RETURN 

£5553 

2600 

zliste*=ziiste$+CHR$(zug) 

£19563 

2050 

» 

£ 1173 

2610 

RETURN 

£5553 

2060 

»*###*###*# Zuggenerator 

£606 3 

2620 

’ 

£1173 

2070 

£1173 

2630 

»##*###»* M-Code Suchroutine 

£ 16933 

2080 

IF spie I er = 1 THEN seite*0 ELSE seite = 

£38733 

2640 

1 

£1173 

2 


2650 

MEMORY &A5FF 

£467] 

2090 

zl 1 s t e $ = "" 

£930 3 

2660 

RESTORE 2730 

£908] 

2100 

FOR sp=l TO 4 

£6323 

2670 

FOR adr=&A600 TO &A65F 

£12493 

2110 

FOR re=i TO 4 

£4923 

2680 

READ a$sv = VAL("A ,, + a$) :s = s + v : POKE adr, 

£20053 

2120 

IF b(sp,re)=2+seite THEN GOSUB 2220 ’ 

£16273 

V 



Damen-Schlagzuege 


2690 

NEXT 

£3503 

2130 

NEXT re,sp 

C 503 3 

2700 

IF s<>12235 THEN PR INT”DATAFEHLER !": 

£20423 

2140 

IF zliste* <>"" THEN RETURN 

C18493 

END 



2150 

FOR sp=l TO 4 

£6323 

2710 

RETURN 

£555 3 

2160 

FOR re=1 TO 4 

£492 3 

2720 

’ 

£ 1173 

2170 

IF b(sp,re ) = 1 + seite THEN GOSUB 2330 ’ 

C19073 

2730 

DATA 21,FF,FF,22,6C,A6,AF,32 

£2100] 

Bauernzuege 


2740 

DATA 6E,A6,DD,E5,El,01,0C, 00 

£16253 

2180 

IF b(sp,re)=2+seite THEN GOSUB 2410 ' 

£ 13583 

2750 

DATA 11,60, A6.ED, B0,DD,2A,68 

£13943 

Damenzuege 


2760 

DATA A6,FD,2A,6A,A6,DD,7E,00 

£12993 

2190 

NEXT re,sp 

£503 3 

2770 

DATA DD,B6,01 , C8,21 , 60,A6,CD 

£13313 

2200 

RETURN 

£5553 

2760 

DATA 49,A6,28,10,21,64,A6,CD 

£9383 

2210 

, 

£1173 

2790 

DATA 49,A6,28,0B,DD,23,DD,23 

£907] 

2220 

*####*«*### Damen-Sch1agzuege 

£22263 

2800 

DATA FD,23,FD,23,03, 18, DE, 3B 

£14293 

2230 

’ 

£1173 

2810 

DATA FF.32.6E,A6,BD,43,6C,A6 

£10583 

2240 

FOR r1=0 TO 7 

£9563 

2820 

DATA C9,7E,DD,BE,00,C0,23,7E 

£14543 

2250 

x=sp+dx(ri):y=re+dy<ri) 

£20463 

2830 

DATA DD,BE,01,C0,23,7E,FD,BE 

£20913 

2260 

WHILE b(x,y)=0 

£ 1639 3 

2840 

DATA 00,C0,23,7E.FD.BE,01,C9 

£14443 




^ COMPILER 

lyyi 1 CPC 464/664 mit Speichererweiterung 

IVII“V/ TUr CPC 6128, Joyce, PC 

vereint hohen Bedienungskomfort mit hervorragender Leistung 

• Vollständige Version mit 13steNiger • 8087 Math Prozessor Unterstützung enthaften 

BCD-Arithmetik für Gleitkommazahlen • AMD 9511 Unterstützung erhattiich 

• Erzeugt kurze und schnelle Programme, die ■ Unix kompatibel 

auch in ein ROM gebracht werden können • Deutsche oder englische Version Meierbar 

• Ausgabe in ZBO-, 8080.8086 Assemblercode • 8"-/525"-/35"-/3" Disk+dt Handbuch 

• Kompatibel zu M8C/L80 (MA3M) von Microsoft Mi-ClürCP/M 445,— DM 

• Fehlerverfolgung mittels Trace möglich Ml-C für CP/M66. MS DOS 575,—DM 

• Umfangreiche Bibliothek inkl math Funktionen Ml-C Crosscompilor 745,—DM 

• für MS DOS/CP/M 66 4 Speichermodelle Ml C CrOGSassemblor^-Unker 545.—DM 

Herbert Rose EDV, Bogensiraße 32,4390 Gladbeck, Telefon (0 20 43) 2 49 12, 4 35 97 
Vertrieb in Österreich; 

Dr. Willibald Kraml, Microconputer-Software, Khunngasse 16/6, A-1030 Wien 


STAR Drucker Typenraddrucker 

NL-10 80St 120Z/s 823,- Silver Reed lieferbar 

SD-10 80Stl60Z/s 1132,- TA Triumph Adler lieferbar 

SG 15 ISRSMPnzÄ 1 ^ 74 ’ _ Farbbänder Nachfüllpack für Star 

II Ss iS: “Äs ’SÄ 

Einzelblatteinzüge lieferbar 

Panasonic Drucker CPC 6128 

Modelle mit Grünmonitor 948,- 

1091,1092,1592 lieferbar CPC 6128 mit SP1000 A 1645,- 

_ „ , Joyce PCW 8256 

FX-85 1247,- a"*';;;. 1 ’ 3 '' 

FX-105136St160Z/s 1598,- Schneider PC ab 1999,- 

LQ 800 1724,- 

Vertragshändler ** 1 Systems 

Oie IOOS6 Computer 

COMPUTER BÜROMASCHINEN SERVICE 

Tecklenburger Str 27, 4430 Steinfurt, Tel (0 25 51) 25 55 
- Alle Preise zuzüglich Versandseibsikosten 

Versand ab Lager per Nachnahme 
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[—Proqrammhit 


PROKYON 

für 464-664-6118 B g 

Eine unbekannte Macht bedroht den Frieden im 
Universum. Der Stützpunkt dieser Macht ist der Planet 
Prokyon, dessen Koordinaten noch unbekannt sind. 
Einer Patrouille Ihres Geschwaders gelang es jedoch, in 
den Besitz eines Peilungsgerätes zu kommen, mit dessen 
Hilfe Sie Prokyon finden können. 

Ihr Auftrag: 

Finden Sie Prokyon. Das Peilungsgerät gibt Ihnen aku¬ 
stische (Ton wird höher, wenn Sie sich Prokyon nähern) 
und optische (Distanz) Hilfen. Überwinden Sie die Ab¬ 
fangjäger und eliminieren Sie Prokyon. 

Bedienung des Programmes: 

Joystick: 

- oben, unten, rechts, links (Raumschiff) 

- Knopf a) Hyperspace 

b) Feuer/Torpedo 
Tastatur: 

- Cursortasten (Raumschiff-Bewegung) 

- ’Z’ a) Hyperspace 

b)Feuer/Torpedo 

Anmerkung: 

Nach jeder Meldung des Bordcomputers geht es mit 
'Feuer’ weiter. Es gibt neun verschiedene Schwierigkeits¬ 
grade. 



Achtung!!! Haben Sie in Phase 3 den Meteoritenhagel 
überstanden, sind Ihre Torpedos aktiviert, die Sie in den 
vor Ihnen sichtbaren Schacht feuern müssen. Zielen Sie 
genau!!! Sie haben nur drei Torpedos. 

Eingabehilfe: 

- Abspeichern vor dem ersten RUN, da Absturzgefahr bei 
unkorrekter Eingabe 

Viel Erfolg beim Abtippen!!! 

Viel Spaß beim Spielen!!! 

(W. Lazik & St. Buchhoiz) 


10 * ##«*««*#*#########*«#*####«««««« [12853 


20 ’ * * C992] 

« PROKYON « 

30 • * * 1175 3 

40 » # produced by * [1854] 

« * 

« 

Waldemar Stephan * 

50 " « 8. * C610] 

« Lazik Buchhoiz » 

« 

« 

60 ’ * called PRIDE-SQFT * [3841] 

# (0-1986 - Berlin 45 * 

*« 

*####«*«»«««««««**»«««*«««#»*« 

70 REM-Daten fuer enl [2536] 


80 DATA 8.01, 8.06, 8.10, 8.00, 8.00, 8.00, 8*00, 8.00, 8.0 [27263 
0,8.00,8.00,8.00,8.00,8.00,8,00,8.C0,8.C0 

90 DATA 8.C0,8.C0,8.C0,8.C0,8.C0,8.C0,8.C0,8.C0 ,LC [22421 
0, S.C0, 8.C0, S.C0, 8,03, 8.03, 8.C0, S.C0,8.C0 

100 DATA 8.C1, 8.02, 8.01, 8.C2, 8.C0, 8.C0, 8.C1, 8.02, 8. [42341 

01,8<C2,8<C0,8<C0 t 8<C3, 8,03, 8.03, 8.C3, 8.C0 

110 DATA 8.C1,8.C3,8.FF,8.FF,8.C3,S.C2,8.C1, 8.D7, & [43981 

FF, 8.FF, 8.EB, S.C2, fcC3,8.D7, 8.FF, 8.FF, &EB 

120 DATA 8.C3, 8.C3, 8.D7, 8.FF, 8.FF, 8.EB, 8.C3, 8.C3, 8. [29133 

FF, 8<FF, 8.FF, 8.FF, 8.C3, 8.C3, 8.FF, 8.FF, 8.FF 

130 DATA 8.FF, 8.C3, 8.C3, 8.FF, S.FF, S.FF, S.FF, 8.C3,8, [49691 

C3, 8.FF, 8.FF, 8.FF, «.FF, «<C3, *.00, 8.00,8.00 

140 DATA 9999 [1321 

150 enl*=STRING*C 106,0) [1250] 

160 RESTORE 80: a=0enl$:a = PEEK(a + 2)«256+PE [67251 

EK(a+1):w = 0:WH 1 LE w<> 9999:READ w:IF w<> 9 

999 THEN POKE a,w 

170 a = a +1:WEND [10981 

180 REM-Daten fuer sehat2 [24773 

190 DATA «.01, «.07, «.08, «<00, «<00, «.00,8.00, «.00, S< [31031 

00, S.00, S.00, «<82, &<00, S.C3, «.00, «.41,8.00 

200 DATA 8.41,8.00, 8.41,8<C3,8.82,8.00,8.82,8.41,8. [30831 

00, 8.C3, 8.C3, 8.C3,8.00,8.82, 8.82, S.C3,8.C3 

210 DATA 8.C3,8.C3, 8.C3,8.41,8.C3, 8.C3, 8.C3, «<C3, 8. [40631 

C3, 8.C3,8.C3, 8.41,8.C3, 8.C3,8.C3,8.C3, 8.C3 


220 DATA 9999 [1321 

230 schat2$=STRING*< 67,0) [19023 

240 RESTORE 190: a=@schat2*:a=PEEK(a+2)*25 [65933 
6+PEEK(a+l):w=0:WHILE w<> 9999:READ w:IF w 
<> 9999 THEN POKE a,w 

250 a=a +1:WEND [10983 

260 REM-Daten fuer torp2 C2284] 

270 DATA 8.01,8.03, 8.0E, 8.00,8,01,8.00,8.00,8.01,8. [37523 

00 , 8 , 00 , 8 . 01 , 8 . 00 , 8 . 00 , 8.01 , 8 . 00 , 8 . 00 , 8.01 

280 DATA 8.00, 8.00, 8<8B,8<BA, 8.00, S.8B,8,8A, 8,00,8. [43851 
8B , 8.8A, 8.00,S.8B, 8.8A, 8.00,8.8B, 8.8A, 8.00 
290 DATA 9999 [1321 

300 torp2*=STR!NG*( 49,0) [22451 

310 RESTORE 270: a=0torp2*:a=PEEK<a+2)«256 (70641 
+PEEK(a+1):w=0:WHILE w<> 9999:READ w:IF w< 

> 9999 THEN POKE a,w 

320 a=a +1:WEND [10981 

330 ENV 2,1,15,1,15,-1,5 (5961 

340 ENV 4,1,15,1 [6591 

350 ENV 5,1,15,1,15,-1,20 (11861 

360 ENV 1,1,15,1,15,-1,5 [10581 

370 ENV 3,1,15,1,15,-1,2 (8933 

380 ENT i,1,4,4,1,4,4 (10391 

390 ENT -2,1,5,2 (7891 

400 ^NT -3,1,-5,2 (7063 

410 ENT 5,1,-5«6,1,5,6,1 [1040] 

420 ENT -7,1,3,9,1,-3,9 (11531 

430 ENT -8,1,vlb,1,15,-1,1 [15651 

440 REM-Daten fuer schelg (24491 


450 DATA 8.01,8.06.8.0F, 8.00, 8.00,8.00, 8.00, 8.00, 8. (33721 
00, 8,00,8.00,8.8A, 8.8A, 8.00,8,00, 8.00,8,00 

460 DATA 8.8A.8.8A, 8.00,8,00, 8.00, 8.45,8.00,8.45, 8. (39663 

00, 8.00,8.00,8.45,8.00, 8.45,8.00,8.00, 8.00 

470 DATA 8,45,8.00, 8.45,8.00, 8.00, 8.00, S.8A, 8.00, 8. [37573 

00,8.8A, 8.00,8.00, 8.8A, 8.00, 8.00, 8.8A, 8.00 

480 DATA 8.00, 8.8A, 8.00,8.00,8.8A, 8.00,8.45,8.00, 8. (35033 

00, 8,00, 8.45,8,00, 8.45,8.00,8.00,8.00,8.45 

490 DATA 8,00,8.45,8.00,8.00,8.00, 8.45,8.00,8.8A, 8. (32063 

00,8.00, 8.00,8,00, 8.8A, 8.8A, 8.00,8.00, 8.00 

500 DATA 9999 (1323 

510 sehe 1g$ = STRING*( 100,0) [14803 

520 RESTORE 450: a=@sche1g*:a=PEEK(a+2)«25 (66081 

6+PEEK(a+1):w=0:WHILE w<> 9999:READ w:TF w 

<> 9999 THEN POKE a,w 

530 a=a+1:WEND [10983 

540 REM-Daten fuer schgeg (24491 

550 DATA 8,01,8.06, 8.11, 8.00,8.00,8.05,8.00,8.00, 8. [33243 
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00, «<00, 8,00, 8-05,8.00,8-00, 8-00, 8-00, 8-00 

560 DATA S-0A, S.0A, 8.00,8-00,8-00, 8.00, 6-0A, S.0A, 8. 125591 

00, 8-00,6,00,8,00, 8-0A, 8-0A, 8-00, 8-00, 8-00 

570 DATA 8.05,8-00,8-05, 8-00,8.00,8-00,8-05,8-00,& C25073 

05, 8,00,8,00,8,00, 8,05, 8-00,8-05,8-00,8-00 

580 DATA 6-00,8-0 A,8-00, 6-00,8-0A,8-00, 8-00,8-0A, 6- £22511 

00,8.00,8-0A,8,00,8,00,8-0A, 8-00,8-00, S-0A 

590 DATA 8-00,8.05,8,00,8-00,8-00,8-05,8,00,8-05,8, £30651 

00, 8-00, 8-00, 8-05, 8-00,8-05, 6-00, 8-00, 8.00 

600 DATA 8,05,8.00, 8-0A, 8-00,8.00,8.00,8.00, 8-0A, 8, £29011 

OA, 8-00, 8.00,8<00, 8-00,8.0A, 8-0A, 8-00, 8-00 

610 DATA 9999 £1321 

620 schgeg*=STRING$( 112,0) £17821 

630 RESTORE 550: a=03chgeg$:a=PEEK(a+2)*25 £59401 

6+PEEK(a+1):w = 0:WH 1 LE w<> 9999:READ w:IF w 
<> 9999 THEN POKE a,w 

640 a=a+1:WEND £10981 

650 REM-Daten fuer torpl £22851 

660 DATA 8-01, 8-03, 8-14, 8.00, 8,01, 8-00, 8-00, 6-01, & £26871 

00,8,00, 8,01,8.00,8,00,8,01, 8.00, 6-00,8-01 

670 DATA 8.00,8.00, 8-01, 8,00, 8-00, 8,03, 8-02, 8.00, 8, £27721 

03,8-02, 8-00,8-47, 8-02, 8-00, 8-47, 8-02, 8-00 

680 DATA 8-03,8-02,8-45,8-03,8-47,8-45,8.03,8-47,8- £23791 

45,8-03,8-47, 8-45,8-03,8-47, 8-45,8-03,8,47 

690 DATA 9999 £1321 

700 torpl*=STRING*( 67,0) £11313 

710 RESTORE 660: a=0torpl*:a=PEEK(a + 2)«256 £49383 

+ PEEK(a + i):w =0:UH 1 LE w<> 9999:READ w:IF w< 

> 9999 THEN POKE a,w 

720 a = a+1:WEND £10981 

730 REM-Daten fuer torp3 £22833 

740 DATA 8-01,8-02,8-08,8-00,8-02,8-00,8-02,8-00,8- £33621 
02, 8-00,8-02, 8-00,8-02, 8-00,8-02, 8.00, 8-02 
750 DATA 9999 £1323 

760 torp3* = STRING* C 22,0) £1386] 

770 RESTORE 740: a=0torp3*:a=PEEK(a+2)*256 £79053 
+ PEEK (a + 1) :w = 0:WH I LE v<> 9999-.READ w:lF w< 

> 9999 THEN POKE a, w 

780 a = a + l:WEND £10981 

790 REM-Daten fuer kla2 £22903 

800 DATA 8-01,8-04,8-0C, 8-00, 8-05,8-0A, 8-00, 8-00,8- £30281 

OB, 8,56,8-00, 8-05,8-0B, 8-FC, 8.A8, 8-05,8-56 

810 DATA 8-FC, 8.A8,8-05,8-56, 8-D6. 8-A8,8-5E, 8-FC, 8- £39953 

FC, 8-FC, 8<A9, 8,43,8-AD, 8-E9,8-5E, 8-FC.8-5E 

820 DATA 8-C3,8-01,8-FC, 8-FC, 8-82, 8-54,8<E9,8<E9,8- £42093 

82, 8-00,8-FC, 8-C3,8-00,8-00,8-41,8,82, 8-00 

830 DATA 9999 £1323 

840 k1a2**STR1NG*( 56,0) EQ623 

850 RESTORE 800: a=©k1a2*:a=PEEK(a + 2)«256+ £45533 

PEEK(a+1):w=0:UH I LE w<> 9999:READ w:IF w<> 

9999 THEN POKE a,w 

860 a = a+1:WEND £10981 

870 REM-Daten fuer kla3 £22933 

880 DATA 8-01,8-02,8-08,8-00, 8-00,8-05,8-A8.8-5E, 8- E24B33 

FC, 8-5E, 8-56,8-0F, 8.E9,8-A9,8-E9,8-54,8-82 
890 DATA 9999 £1323 

900 k1a3*=STRING* ( 22,0) £7063 

910 RESTORE 880: a=ök1a3*:a=PEEK(a + 2 >«256+ £43473 


PEEK(a+l> :w*0: WHILE w<> 9999:READ v-.IF v<> 

9999 THEN POKE a,w 

920 a=a+1:WEND £10983 

930 REM-Daten fuer eigl £24523 

940 DATA 8-01,8-08,8-0E, 8-00,8<0A, 8-00,8.54,8-A8,8- £35361 
00,8-05,8-00, 8-05, 8,00,8-00,8-54,8-A8,8-00 
950 DATA 8-00, 8-0A, 8,0 A, 8-00,8-00, 8,54,8-A8,8-00,8- £32223 
00,8-05,8-C0, 8-A8, 8-00, 8-B9,8-76, 8-00,8-54 
960 DATA 8-C0, 8-05,S-4A, 8-00,8-B9,8-76,8-00,8-85, 8- £40703 
0A, 8.00,8.05,8,80,8.EB, 8<D4,8<40, 8.0A ,8-00 
970 DATA 8-00,8-00, 8-5B, 8-C1,8-C2,8-A7,8.00, 8.00, 8- £27803 
00,8-00,8-54,8-C3,8-C3, 8-A8,8-00,8-00,8-00 
980 DATA 8-00,8-54,8-6B, 8-97, 8-A8, 8-00, 8-00, 8-00,8- £23783 
0A, 8-5E.8-6B, 8,97,8-AD, 8-05,8-00,8-05,8-05 
990 DATA 8-80,8-FC, 8-FC, 8-40, 8-0A, 8-0A , S-5B , 8-4A, S< £29383 
00, 8-00,8,00,8-00,8,85,8-A7, 8-4A, 8-A8, 8,00 
1000 DATA 8-00,8-00,8-00,8-54,8.85,8-00,8-00,8-00, £25563 
8 - 00 , 8 - 00 , 8 - 00 , 8 - 00 , 8 - 00 , 8 - 00 , 8 - 00 , 8 - 00 , 8-00 
1010 DATA 9999 £1323 

1020 eig1*=STRING*( 124,0) £7763 

1030 RESTORE 940: a = 0e 1 gl *:a = PEEK(a + 2)»256 £69303 
♦ PEEK <a + l):w = 0:WH I LE w<> 9999:READ w:IF w< 

> 9999 THEN POKE a,w 

1040 a=a+l:WEND £10983 

1050 REM-Daten fuer pla2 £24743 

1060 DATA 8-01,8,05,8-10, 8-00, 8.00, 8-0F, 8.00,8-00, £34533 
8-00, 8-05,8-FC, 8-A8,8-00, 8-00, 8-5E, 8-A8.8-FC 
1070 DATA 8-00, 8,00,8-5E, 8-FC, 8-FC, 8-00, 8-05,8-FC, £26283 
8-FC, 8-FC, 8-82,8-05,8-FC, 8-FC, 8-54, 8-82,8-05 


1080 DATA 8-E8,8-FC, 8-FC, 8-82, 8-F6,8-FC, 8-FC, 8-FC, 
8.E9,8.F6,8-FC, 8-FC, 8-54, 8-E9,8.54,8-D4,8-FC 
1090 DATA 8-E8,8,82,8-54, 8-FC, 8-FC, 8-54,8-82,8,54, 
8-E9,8.D6,8-FC, 8-82,8,00, 8-E9,8-63,8-E9, 8,00 
1100 DATA 8-00, S-FC,8-C3,8-E9, 8-00,8-00,8-54,8-FC, 
8-82,8-00, 8-00,8-00,8-C3, 8-00, 8-00,8-00, 8-00 
1110 DATA 9999 
1120 pla2*=STRING*( 89,0) 

1130 RESTORE 1060: a = 0p1a2*:a = PEEKCa + 2)»25 
6+PEEK(a+1):w=0:WHILE w<> 9999:READ w:JF w 
<> 9999 THEN POKE a.w 
1140 a=a+1:WEND 

1150 REM-Daten fuer geg5 

1160 DATA 8.01,8-08,8-00,8-00,8-00,8-00,8.40,8-80, 
8-00,8-00, 8-00,8-00, 8-00,8-40,8-61,8-42,8-80 
1170 DATA 8-00,8-00,8-00, 8-40, S.C1, 8-03, 8-03, 8-C2, 
8-80,8,00,8-00, 8-D1,8-F3, 8-C3.8-C3, 8-F3, 8-E2 
1180 DATA 8-00,8-40,8-F3, 8-F3,8-E3, 8-D3, 8-F3, 8-F3, 
8-80,8,40, 8-F3, 8-FC, 8-F6,8-F9, 8-FC, 8-F3,8-80 
1190 DATA 8-F9, 8-F6,8-F3,8-E3, 8-D3, 8-F3, 8-F9.8-F6, 
8.F9,8-F9,8-F3, 8.F6,8-F9,8-F3, 8-F6, 8-F6,8-FC 
1200 DATA 8-F3, 8-F3, S-6B, 8-97, 8-F3, 6-F3,8-FC, 8-5B, 
8-0F, 8-F3,8,00,8-00,8-F3,8-0F, 8-A7, 8-0F, 8.00 
1210 DATA 8-00, 8-00, 8-00,8-00, 8-00, 8-0F, 8-00,8-00, 
8-00, 6-00,8-00,8-00,8-00, 8-00,8-00, 8-00,8-00 
1220 DATA 9999 
1230 geg5*=STRING*( 108,0) 

1240 RESTORE 1160: a=©geg5$:a-PEEK(a+2)»25 
6+PEEK(a+1):w=0:WH!LE w<> 9999:READ w:IF w 
<> 9999 THEN POKE a,w 
1250 a = a +1:WEND 

1260 MEMORY 8-A500:REM daten fuer-geg 

1 

1270 DATA 8,01,8,08, 8-0C, 8,00, 8-00, 8-00,8-40,8-80, 
8-00, 8-00,8-00,8-00,8-00, 8-40,8-D4,8.E8,8-80 
1280 DATA 8-00,8-00, 8-00, 8,00,8-C0, 8-FC, S-FC, 8-C0, 
8,00, 8-00,8-00,8-40,8-FC, 8-A9,8-56, 8-FC, 8-80 
1290 DATA 8-00,8-00,8-D4, 8-F3,8-EF, 8-DF, 8-F3,8-E8, 
8,00,8-40,8-F9,8.00,8-A3, 8-53,8,00,8-F6, 8-80 
1300 DATA 8,05,8-A2,8,00,8-51,8-A2,8-00,8,51,S-0A, 
8-D1, 8-00,8-00, 8-00,8-00, 8-00,8-00,8-E2, 8-22 
1310 DATA 8-00,8,00,8-00,8.00,8,00,8-00,8-11,8-A2, 
8-00,8-00, 8-00,8-00,8-00, 8-00,8-51,8-00,8-00 
1320 DATA 8-00,8-00,8-00,8-00,8-00,8-00,8-00,8-00, 
8-00,8-00, 8-00, 8-00,8-00,8-00, 8-00, 8-00,8-00 
1330 DATA 9999 
1340 gegl*=STRING*( 108,0) 

1350 RESTORE 1270: a=©gegl*:a=PEEKCa+2)»25 
6+PEEK(a+1):w=0:UHILE v<> 9999:READ w:IF w 
<> 9999 THEN POKE a,w 
1360 a=a+1:WEND 

1370 REM-Daten fuer geg2 

1380 DATA 8-01,8-06,8-07,8-00,8-00,8-40,8-80,8-00, 
8-00, 8-00,8-40,8-D4,8-E8,8-80,8-00, 8-00,8.D4 
1390 DATA 8-A9,8-56,8-E8,8,00, 8-40,8-A8,8-F3, 8-F3, 
8-54,8-80,8-05,8-00, 8-15, 8-AA, 8-00, 8-0A,8<80 
1400 DATA 8-00, 8,00, 8-00,8-00, 8-40, 8-0A, 8-00,8-00, 
8-00,8-00,8-05,8-00, 8-00, 8-00,8-00, 8-00,8-00 
1410 DATA 9999 
1420 geg2*=STRlNG*< 52,0) 

1430 RESTORE 1380: a=©geg2*:a=PEEK(a+2)»25 
6+PEEK(a+1):w=0:WHILE w<> 9999:READ w:lF w 
<> 9999 THEN POKE a,w 
1440 a=a+1:WEND 

1450 REM-Daten fuer geg3 

1460 DATA 8-01,8-03,8-04,8-00,8-C0,8-00,8-40,8-03, 
8-80,8-80,8-00, 8-40,8-80,8-00, 8-40,8-00,8-00 
1470 DATA 9999 
1480 geg3*=STRING*( 19,0) 

1490 RESTORE 1460: a=*0geg3* : a = PEEK(a + 2) »25 
6 + PEEK(a+1):w = 0:WH I LE w<> 9999:READ w:IF w 
<> 9999 THEN POKE a,w 
1500 a=a+1:WEND 

1510 REM-Daten fuer eig4 

1520 DATA 8,01,8-06,8-07, 8-80,8,00, 8-00, 8,00,8,00, 

8-40,8-40, 8,80,8-00,8-00,8-40, 8-80,8-00, 8-40 

1530 DATA 8-40,8-80,8,80, 8-00, 8-00,8-00, 8-Dl,8-E2, 

8-00,8-00,8,00, 8-05,8-7B, 8-B7, 8-0A, 8.00,8-05 

1540 DATA 8-0A, 8-05,8-0A, 8-05, 8-0A,8-0A, 8-00, 8-00, 

8-00,8-00,8-05,8-00,8-00,8-00,8-00,8-00,8-00 

1550 DATA 9999 

1560 e1g4* =STRING*( 52,0) 

1570 RESTORE 1520: a=©eig4*:a=PEEK(a+2)*25 
6+PEEK(a+l):w=0:UHILE w<> 9999:READ w:lF w 
<> 9999 THEN POKE a,w 
1580 a=a+1:WEND 

1590 REM-Daten fuer eig5 


£30283 

£40383 

£33463 

£ 132 3 
£750 3 
£46503 


£ 10983 
£25273 
£24393 

£30363 

£29903 

£41183 

£35913 

£29273 

£1323 

£9273 

£57723 


£10983 
£ 12903 

£30483 

£29343 

£27513 

£35613 

£24403 

£32933 

£1323 

£6303 

£79563 


£10983 

£25183 

£29523 

£35553 

£25293 

E 1323 
£ 1973 
£63263 


£10983 

£25213 

£33353 

£1323 

£9463 

£67453 


£10983 

£24613 

£29083 

£31173 

£25823 

£ 1323 

£11083 

£50243 


£ 10983 
£24643 
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1600 DATA 8.01, 8(03, 8,04, 8.0 0,8«00, 8.00, 8,00, 8,00, 
8,00, 8,05, 8,0F, 8,0 A, 6,0 A, 8.00, 8,05, 8,00,8,00 
1610 DATA 9999 
1620 eig5*=STRING*( 19,0) 

1630 RESTORE 1600: a=0e1g5i:a=PEEK(a+2)»25 
6+PEEK(a + 1):w=0:WH I LE w<> 9999:READ w:lF w 
<> 9999 THEN POKE a,w 
1640 a=a+1:WEND 

1650 REM---Daten fuer expl 

1660 DATA 8,01, 8,08, 8,19, 8,00, 8,05, 8,01, 8,00, 8,00, 

8,00,8.0A, 8,00,8,00,8,00,8,00,8,05,8,00,8,00 

1670 DATA 8,00,8.00,8,00,8,00,8,00,8,00,8.0B,8,00, 

8,00, 8,00,8,00, 8,02, 8,02, 8,0A, 8,0A, 8,00,8,00 

1680 DATA 8,00, &<05, 8,85, 8,00, 8,02, 8,01, 8,05, 8,00, 

8,00, 8-45,8<02, 8(02,8,00,8.00,8.4A, 8,00,8,00 

1690 DATA 8(00,8-00,8(40,8(00,8(00,8(40,8(00,8(00, 

8-00, 8(00, 8(00,8(C5,8(85,8(00,8(45,8(00, 8-00 

1700 DATA £00, &45, £42, 8cQ i, 8:00, , S(8A, 8-00, 

8(00, 8(85,8(07,8(87,8<8A, 8-00, 8.8A, 8(40, 8(02 

1710 DATA 8(02, 8,40,8(00,8(47, 8(0A, 8<00,8(45,8(00, 

8,40,8,00, 8,07, 8(85,8(00, 8-00,8,00,8,00, 8(45 

1720 DATA 8,05,8,05, 8(02, 8,80,8.00, 8<00,8,00, 8,80, 

8,80,8,00,8,00,8,00,8,00, 8(00,8,40, 8.0A, 8,01 

1730 DATA 8,01,8,02, 8,02, 8,00,8,00, 8,80,8.0A, 8,00, 

8,80, S(0A, 8,00, 8.0A, 8,00, 8,00, 6,00,8,01,6,00 

1740 DATA 8,80,8,00.8(00,8,05,8.00,8(01,8(80,8(00, 

8,00,8,42,8,00, 8,00,8(00, 8.8A, 8.00,8,47,8,00 

1750 DATA 8.00,8,00, 8.00, 8.01,8,0A.8-0A, 8,05,8.00, 

8.0B, 8,0A, 8,00, 8.05,8,00,8,02, 8,01,8,00,8,00 

1760 DATA 8,00,8,00,8,00, 8,00,8,00,8,05,S.8F, 8,40, 

8,00, 8,00,8,00, 8(45,8(00,8.00,8(47,8(00,8.02 

1770 DATA 8.00,8,00,8,00,8(00,8(00,8,00,8(00,8(00, 

8,00, 8,00,8,05,8,00,8(00,8,01,8,00,8,00,8.00 

1780 DATA 9999 

1790 expl* = STRING$ < 212,0) 

1800 RESTORE 1660: a=0expl9:a=PEEK(a+2)»25 
6+PEEK(a+l):w=0:WHILE w<> 9999:READ w:IF w 
<> 9999 THEN POKE a,w 
1810 a=a+1:WEND 

1820 REM-Daten fuer exp2 

1830 DATA 8.01,8.05,8.10,8,00,8.00, 8.0A, 8,05,8,00, 
8.00, 8,0A, 8,00, 8,02,8,00,8,00,8,02, 8,00,8,00 
1840 DATA 8,00,8,00,8,40,8(88,8(00,8(00,8(40,8(00, 
8,05, 8.4F, 8,00,8.01,8,00,8,07, 8.40, 8<45,8.8A 
1850 DATA 8,47,8,00,8,80, 8,00, 8.05,8,01,8(C0,8,0A, 
8,00,8,00,8(40,8,08, 8,02, 8,02,8.8A, 8,80,6,40 
1860 DATA 8,00, 8.0F, 8,80,8,01,8,80, 8,42, 8,00,8,45, 
8.00, 8,02,8,00,8(00, 8,00,8.01,8.00, 8,8A, 8,02 
1870 DATA 8,00, 8,00,8,80,8.0F, 8.00,8,05, 8,BA,8c8A, 
8,00, 8,00, 8(00, 8,00, 8,0A, 8,00,8,00,8,00,8,00 
1880 DATA 9999 
1890 exp2*=STRING9( 89,0) 

1900 RESTORE 1830: a=0exp29 :a=PEEK(a+2)»25 
6 + PEEK Ca+1):w=0:WHILE w<> 9999:READ w:IF w 
<> 9999 THEN POKE a,w 
1910 a=a+1:WEND 

1920 REM-Daten fuer pla 

1930 DATA 8,01,8,08,8,19,8.00,8,00, 8,05,8.0F, 8.0F, 

8,00,8.00, 8,00,8,00, 8,00, 8,58,8,F3, S.F3, 8.0F 

1940 DATA 8.00,8(00, 8,00,8.05,8,F6,8,FC,8(FC,8<F6, 

8.A8,8,00, 8,00,8(05,8.F6, 8.FC, 8,80,8.FC, 8<A8 

1950 DATA 8,00, S<00, 8,05,8.F6,8.FC, 8.FC, 8.FC, 8,A8, 

8,00,8,00, 8.5B, 8(FC, 8.5E, 8.FC, 8,54, 8<FC, 8,00 

I960 DATA 8.00, S.5B, S.FC, 8,FC, 8<FC, 8.FC, 8.FC, 8,00, 

8.00,8.5E, LFC, 8.FC, 8.FC, 8,54,8.5E, 8,00, 8,05 

1970 DATA 8.A7,8(FC,8,AD,8(FC, 8,54, 8.FC, 8,82,8,05, 

8(F6,8.FC, icFC , 8.FC, 8.FC, 8.FC, 8,82, 8,05,8,F6 

1980 DATA 8,E8,8,FC,8(E8,8.FC,8,FC, 8.82, 8,05,8.F6, 

8.FC, 8.FC, 8.FC, 8.FC, 8.FC, 8,82, 8.05,8.F6,8.FC 

1990 DATA 8.FC,8,FC,8(FC,8,B9,8,82, 8,05, 8,B3,8.FC, 

8.FC, 8.FC, 8,B9,8.FC, 8,82,8,05,8.F6, 8.FC, 8,76 

2000 DATA 8(76, 8,A8,8<FC, 8,82, 8,05,8.F6,8<FC, 8.FC, 

8-FC, 8-A8,8.FC, 8,82,8,05,8.FC, 8<FC, 8,FC,8.FC 

2010 DATA 8,A8,8(E9,8,82, 8,00, 8,FC,8(A8, 8.54, 8.FC, 

8.FC, 8.C1,8,00,8,00, 8.FC, 8,41,8,82, 8.AD, 8.A8 

2020 DATA 8(E9,8.00, 8,00,8.FC, 8,41,8,63, 8,D6,8<FC, 

8.C3,8,00, 8,00,8,54,8.E9,8,03,8,D6,8,54,8,82 

2030 DATA 8,00,6,00, 8,54,8.FC, 8,03, 8.FC, 8,54,8,82, 

8,00,8,00, 8,54,8.FC, 8.FC, 8.FC, 8.E9,8,82,8<00 

2040 DATA 8,00,8.00,8(FC,8.E8,8,A8, 8(03,8,00,8,00, 

8,00,8,00,8(41,8.03,8,03, 8,82,8,00,8.00, 8,00 

2050 DATA 9999 

2060 pla«*STRING*( 212,0) 

2070 RESTORE 1930: a=öpla*:a=PEEK(a+2)»256 
+ PEEK(a+l):w = 0:UH I LE w<> 9999:READ w:lF w< 
> 9999 THEN POKE a,w 
2080 a*a+1:WEND 


£30733 

£1323 
£206 3 
£72883 


£10983 

£29633 

£33003 

£26013 

£32953 

£22153 

121183 

£30483 

£30183 

£30203 

£23523 

£27113 

E16083 

£23553 

£1323 

£12893 

£66303 


£10983 

£29663 

£33063 

£34423 

£25733 

£24873 

£27783 

E 1323 
£6073 
£57353 


£10983 

£23183 

£22223 

£36073 

£34313 

£34403 

£38323 

£30303 

£41413 

£35393 

£31373 

£37013 

£28343 

£30853 

£1323 

£19711 

£52533 


£ 10963 


2090 DATA 010ba52120aScddlbcc916a5c3c?a5c3 £89793 
cca5c3dla54558c34745d45055d400000000000000 
©60S060600S000fe032813fe04c2S7a5dd5e00dd23 
dd6600dd237d322ca5dd6e00dd66012228a5dd6e02 
dd 

2100 DATA 66032226a5dd6e04dd66052224a5dd2a £87353 
28a5dd6e01dd66022228a5dd2a28a5dd7e01322aa5 
dd7e02322ba5dd23dd23dd23dd2228a5c9elc9©0©0 
000000c5e5dde5el06004f7ccbbffe4038077e4779 
cd 

2110 DATA 38a67778elclc93a24a56f2600328ca5 £98403 
29eb3a26a56f3ec89d328da52600cdIdbc228aa5c9 
00f53e011808f53e021803f53e0332c6a5fIcd2da5 
Cda8a52a28a5dd2a8aa53a2ba547c53a8ca54fdd2a 
8a 

2120 DATA a53a2aa547c53ac6a5fe01cc24a63ac6 £90093 
a5f e02cc2aa63ac6a5fe03cc33a623dd23cl10ele5 
2a8aa5cd26bc228aa5elcl10c6c97ecd8ea577c9af 
Cd8ea577cd8ea5c97ecd8ea5c9f53a2ca5f e01280c 
f e 

2130 DATA 03280bfe02280bfIae77c9f177c9flb6 £58613 
77c9flc54fe6aab728065f78e655b34779e655b728 
065f 78e6aab34778clc900 

2140 RESTORE 2090: ad = 8,A501 :FOR x = l TO 5:RE £59833 
AD d*(x):FOR y=l TO LEN(d*<x)> STEP 2:w=VA 
L( "8," +M1 D$ (dt ( x), y, 2) ) :POKE ad, w: ad=ad+1: N 
EXT y, x : CALL 8.A501: 

2150 REM £2723 

2160 MODE 1:INK 0,0:1NK 1,20:INK 2,3,6:1NK £61183 
3,11:PAPER 0:PEN 2:L0CATE 14,3:PR INT"P R 
0 K Y 0 N":BORDER 0 

2170 PEN 1: LOCATE 5, 10: PR I NT"Leve I Kleich £85183 
t)--9(unmoeglIch) ?":LOCATE 1,15:PRINT"Joy 


stick oder Cursortasten 8, ’Z" (Feuer)." 

2180 LOCATE i,24:PEN 3:PRINT"U.Laz1k- £32333 

--P R l D E-St.Buchholz" 

2190 aul=1NKEY*:1F aw*="" THEN 2190 £8883 

2200 ba11 er *VAL < aw*):IF baller<l OR baller £31723 
>9 THEN 2190 

2210 GOSUB 3400:REM Anzeige £20893 

2220 GOTO 3610:REM phase 1 £15493 

2230 GOTO 2490:REM Phase 2 £9713 

2240 x=38:y=40:REM Phase 2 £24353 

2250 geghi=18 £5303 

2260 h*=elgl*:!EXC,x*l,y*i,0h*,2 £17003 

2270 SOUND 1,15,20,8,5,9,8 £14413 


2280 PLOT 20,zeit:DRAU 40,ze1t,7:ze1t=ze1t £33323 
-0.2:IF ze1t<=-38 THEN 4510 

2290 IF JOY(0)=8 OR INKEY<1)=0 THEN GOSUB £27383 
2390 

2300 IF JOY(0)=4 OR INKEY(8)=0 THEN GOSUB £24433 
2440 

2310 geghi=geghl+1:IF geghi=19 THEN geghi= £25353 
1:xx=RND«30+25:yy=RND*10+64 

2320 IF INKEY <71)=0 OR JOY(0) = 16 THEN GOSU £19033 
B 2940 

2330 IF JOY(0)=1 OR INKEY<0)=0 THEN GOSUB £22583 
2980 

2340 IF JOY(0)=2 OR INKEY<2>=0 THEN GOSUB £15663 


3020 

2350 IF gegh1<4 THEN GOSUB 3060 £11813 

2360 IF geghi>3 THEN GOSUB 3090 £20963 

2370 IF yy-y<4 AND ABS(xx-x)<6 AND geghi>3 £27343 
THEN 3330 

2380 GOTO 2270 £3653 

2390 !PUT,x*l,y*l,0ht,1 £12973 

2400 h*=eigl* £7193 

2410 x=x+4:1F x>62 THEN x=62 £10273 

2420 !EXC,x*i,y*l,0h$,2 £16273 

2430 CALL 8.BD19:RETURN £4493 

2440 !PUT,x**l,y*i,0h$, 1 £12973 

2450 h*=eigl$ £7193 

2460 x*x-4:IF x<10 THEN x=10 £14033 

2470 IEXC,x*1,y*1,0h*,2 £16273 

2480 CALL 8.BD19:RETURN £449 3 

2490 REM Phase 2 £7173 


2500 f-2:s*l:fa-l:CLS *2:PRINT t2:PR!NT #2 £138623 
:PR I NT #2," Prokyon lst":PRINT #2:PRINT # 

2," fast erreicht.”:PRINT #2:PRINT #2:PRIN 
T #2," Vorsicht}!!":PRINT #2:PRINT *2:PRI 
NT #2," Abfangjaeger...":PLOT 60,-40:DRAU 
580,-40,8 

2510 IF JOY(0)=16 OR INKEY(71)=0 THEN 2520 £32443 
ELSE 2510 

2520 CLS #2:INK 2,0:INK 3,0:INK 4,0:INK 5, £28013 
0 : INK 6,0:SPEED INK 2,2:INK 15,0 

2530 ORIGIN 0,0 :PEN 11:L0CATE 5,10:PRINT" £31133 
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Programme | 


PART-2: " :PEN 0 

2540 FOR n=i TO 50 C8943 

2550 PLOT !NT(RND*640) +1, INT(RND*230) +1, h 1 £17073 
k 

2560 fa=fa-1:1F fa=-l THEN fa=l £20333 

2570 IF fa=1 THEN hik = l ELSE hik = 7 £15463 

2580 NEXT n C3663 

2590 ORIGIN 0,-80 £215] 

2600 1=2 £418] 

2610 m=200 162] 

2620 FOR n=1 TO 80 £8163 

2630 PLOT 64,m:DRAW 576,m,1 £9683 

2640 m=m-10»(n/80) £494] 

2650 1=1+1:IF 1=7 THEN 1=2 £5633 

2660 NEXT n £3663 

2670 m=200:I=20 £2673 

2680 FOR n=3l5 TO 155 STEP -10 £9133 

2690 PLOT n,m:DRAW n-1,0,15 £20173 

2700 1=1*1.4 £5503 

2710 NEXT n £3663 

2720 1=20 £633 

2730 FOR n=325 TO 485 STEP 10 £10073 

2740 PLOT n, m:DRAW n+1,0,15 £14003 

2750 1=1*1.4 £5503 

2760 NEXT n £3663 

2770 PLOT 320,m:DRAW 320,0,15 £9853 

2780 PLOT 0,200:DRAW 640,200,15 £11193 

2790 1=1 £4233 

2800 ORIG IN 0,200 £304 3 


2810 FOR tt = 30 TO -200 STEP -'2:PL0T l,tt,7 £39033 
:DRAW 60,tt:PLOT 580,tt:DRAW 640,tt:NEXT t 
t 

2820 PEN 9;LOCATE 20,12:PRINT"R":LOCATE 20 £48613 
,14:PRINT”l":LOCATE 20,16:PRlNT"D":LOCATE 
20,18:PR INT”E”:PEN 0 

2830 PLOT 60,-200,8:DRAU 60,30:DRAU 580,30 £32813 
:DRAU 580,-200:DRAW 60,-200 

2840 ORIGIN 0,0:PLOT 1,399:DRAW i,l,l:DRAW £21763 
639,1:DRAW 639,400 

2850 ORIGIN 0,40:FOR n=-38 TO zeit STEP 2: £36793 
PLOT 20, n :DRAU 40, r>, 11 :NEXT 

2860 INK 15,1,0:EVERY 5 GOSUB 2880 £5323 

2870 GOTO 2240 £3473 

2880 1=1+1:IF 1=7 THEN 1=2 £5633 

2890 IF 1=2 THEN INK 2,f:INK 3,0 : INK 4,0 £35873 
:INK 5,0:INK 6,0: RETURN 

2900 IF 1=3 THEN INK 3,f: INK 2,0: INK 4,0 £30533 
: INK 5,0:INK 6,0:RETURN 

2910 IF 1=4 THEN INK 4,f:!NK 2,0: INK 3,0: £31573 
INK 5,0:INK 6,0:RETURN 

2920 IF 1=5 THEN :INK 5,f:INK 2,0: INK 3,0 £33673 
:INK 4,0:INK 6,0:RETURN 

2930 IF 1=6 THEN INK 6,f:INK 2,0t INK 3,0: £23433 
INK 4,0:INK 5,0:RETURN 

2940 gei*=scheig*:!EXC,x* 1 +1,y*1 +16.0sei•, £26203 
2 


2950 CALL &BD19:SOUND 2,200,30,15,1,3,3 £10563 

2960 !PUT,x*i+l,y*l+16,@sei*,l:IF yy-y<28 £39323 

AND yy-y>15 AND ABS(x-xx><3 AND geghi>3 T 
HEN 3230 

2970 RETURN £5553 

2960 !PUT,x*l,y*l,0h*,1 £12973 

2990 h*=eigl*:y=y-4:IF y<16 THEN y=16 £27573 


3000 IEXC,x*l,y*l,0h*,2 £16273 

3010 CALL &BD19:RETURN £4493 

3020 IPUT,x*l,y*i,0h*,1 £12973 

3030 h*=eigi*:y=y+4:IF y>56 THEN y=56 £24463 

3040 !EXC,x*l,y*l,@h$,2 £16273 

3050 CALL 4-BD19:RETURN £449 3 


3060 IF geghi=1 THEN gl*=geg3*;IEXC,xx*l,y £31663 
y*l,0gl*,2 ;RETURN 

3070 IF geghi=2 THEN 1 PUT,xx* 1,yy*1,0g1 *,1 £49353 
g2*= ge g2* : IEXC, x x * 1, yy* 1,0g2*, 2 : RETURN 

3080 IF geghi=3 THEN !PUT,xx*1,yy*1,0g2*,1 £37053 
:g3*=gegl*:!EXC,xx*1,yy*1,0g3*,2: RETURN 


3090 IF geghi<17 THEN 3100 ELSE 3160 £16593 

3100 2uf =RND*17:IF zuf<baller + l THEN GOSUB £36023 
3190 

3110 IPUT,xx*i,yy*i,0g3*,1 £15153 

3120 g3*=gegl*:xx=xx+RND*7-4:yy=yy+3:!EXC, £28753 
x x * 1,yy*l,0g3*,2 

3130 CALL &BD19 £3523 

3140 IF geghi = 16 THEN I PUT,xx* 1,yy*1,0g3*, £17583 
1 

3150 RETURN £5553 

3160 hu*=geg5*:xx=xx+RND*7-4:yy=yy+3:IEXC, £29143 
xx*i,yy*l,0hu*,2 

3170 CALL «<BD19: IPUT, xx*l, yy*l,0hu*, 1 £18953 

3180 RETURN £5553 


3190 schg* = achgeg*:IEXC,xx*l + l,yy*l-10,03C £31273 
hg*,2 

3200 CALL &BD19:SOUND 4,139,30,15,1,8,6:IP £45053 
UT,xx*l+l,yy*t-10,@schg*,1 

3210 IF yy-y>15 AND yy-y<28 AND ABS(xx-x)< £31543 
4 THEN GOSUB 3280 

3220 RETURN £5553 

3230 bum2* = exp2*:IEXC,x*l + i,yy*l-4,0bum2*, £75893 
2:CALL &BD19:S0UND 4,1911,30,13,2,8,15:SOU 
ND 4, 1911,160, 15,5,8, 15:F0R n = l TO 30:NEXT 

3240 I PUT,xx*l,yy*l,0g3*,1: IPUT,x*i + l,yy*l £32993 
-4,9bum2$,1 

3250 CALL S,BD19:bum* = expl* : I EXC, xx*l, yy*l, £29853 
©bum*,2 :FOR n=l TO 120:NEXT 

3260 IPUT,xx*l,yy*i,©bum*,1:IPUT,xx*l,yy»l £24583 

,®g3*,1 

3270 geghi=18:FOR n=l TO 400:NEXT:!PUT,x»1 £55373 

,y*l,0h*,lstreffer=treffer+1:tr=10: GOTO 3 

380 

3280 bum2*=exp2*:IEXC,x*l+l,y*l,®bum2*.2:C £67303 
ALL &BD19:SOUND 2,1911,30,13,2,8,15:SOUND 
2,1911,160,15,5,8,15:F0R n=l TO 30:NEXT 
3290 IPUT,x*l,y*i,@h*,1:IPUT,x*1♦1,y*1,©bu £25683 
m2*, 1 

3300 CALL &BD19:bum*=expi*: IEXC,x* 1,y*1,0b £39763 
um*,2:FOR n=l TO 120:NEXT 

3310 IPUT,x*i,y*i,©bum*,1:IPUT,x*l,y*i,Sh* £17923 
, 1 

3320 x = 38:y = 40:jae = Jae-1:FOR n=l TO 400:NE £40723 
XT: GOTO 3380 

3330 IPUT,x*l,y*l,0h»,1:IPUT,xx*l,yy*l,0g3 £21633 
*, 1 

3340 bum*=expl*tIEXC,x*i,y*l+8,0bum*,2:SOU £28273 
ND 2,1911,160,15,5,8,15 
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Hochstraße 11 
8500 Nürnberg 80 
Tel.: 09 11 / 28 90 28 


75- 


Alle iiu.j- sl SCHNEIDER Produkte 
zu günstigen Preisen lieferte 
PC Erwelieruno B40K 
öMiotncs Produkte eB 
64KEnvellerung 
256K-Eiweiterunö 
Silicon Disc 256K 
SEIKOSHA SP 1000 
STAR NL 10 

Ttarnoflruckei TXP 1000 
JOYCE Ztwrllbulweik FD-2 
JOYCE-RAM Etweiteruna 
JOVCE-Nachrüstsatz 
CllMANA-Zweitliubvetk 3' 

^ ■(10100.^ SD 15 
Xuulwctk Fl X.'MI-X 
MOUSEWCK 
AMXMOUSE 
RUSH WARE MOUSE 

GRAPH PAD II _ 

Wir führen zu den Orlginal-SCHNEIDER-Produkten Artikel verschiedener Firmen wie 
DATA BECKER, VORTEX, STAR-DIVISION, CUMANA, GERDES, PRDFISOFT, ARIOLA, 
RUSH-WARE. MARKT & TECHNIK, SYBEX, STAR, SCHNEIDER-DATA usw.! 



MULTIRACE 2 
MIRAGE iMAGFR 
SOFTWARE: 
riNAN7BUCHHALTUi'JG (D) 
MICROSOFT-BAS I C (D) 

C BASIC COMP LER (0) 
HISOFT C (D>_ 

NEVADA FORT RAV il); 
NEVADA COBOL (D) 
STARTEXTER (Dt 
STAR DATEI |D| 

ASSEMBLER KURS (WD) 
EASY WORDSTAR PC 
TMS MUSIC SYSTEM (Dl 
LASER-BASIC (D) 

SUPER COPY (D) 

TURBO PASCAUGralik (0) 
-:-A ' 

DR DRAW (Oeutsdil (D) 

iBASEi'MULITP. (D) 


175- 

198- 

m 

189 
174- 
169- 
109 - 
109- 
85.- 
85,- 
64-;75- 
199 
59- 
59- 
79- 
259 - 
199 - 
199 - 
ie 199 
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I Programme 


□ 


3350 CALL &BD19:FOR n = l TO 100:NEXT [1729] 

3360 'PUT,x»l,y*l+8,Öbum*,1;!PUT,x»1,y*1,0 £2828) 
h$, 1 

3370 x=38:y=40:geghi=iB:FOR n=l TO 400:NEX £38523 
T:GOTO 3380 

3380 GOSUB 4130:REM Auswertung £23283 

3390 GOTO 2260 £3593 

3400 REM anzeige £6893 

3410 MODE 0:QRIG1N 0,200:INK 0,0:INK 1,26: £82963 

INK 15,1:INK 7,10:INK 8,15:INK 9,1:INK 10, 

25:INK 11,6:INK 12,11:INK 13,12:INK 14,6,2 
5:SPEED INK 200,200 

3420 torpedo=3:treffer=0:3ae=4:score=0 £20453 

3430 FOR n=30 TO 200:PLOT l,n,7:DRAU 640,n £33383 
: NEXT 

3440 WINDOW #2,3,18,12,25:PAPER #2,0:CLS t £26053 
2 

3450 PAPER 7:PEN 8:L0CAT£ 2,2:PR INT"Sc:"js £40943 
care 

3460 LOCATE 2,3:PR INT n Ja:";jae:LOCATE 11,2 £65743 
:PRlNT"Tp:" :LOCATE 14,2:PRINT torpedo:LOCA 
TE li,3:PRINT"Tr:”;treffer:LOCATE 17,2:PRI 
NT"QFF" 

3470 PEN 1:LOCATE 1,4:PRINT STRING*(8<14, " = £61533 
"):PEN 9:LOCATE 1,6:PR INT"F":LOCATE 1,7:PR 
INT "U":LOCATE 1,8:PRlNT"E":LOCATE 1,9:PR! 
NT"L":PEN 0 

3480 LOCATE 4,6:PRINT"DIstance:" £21873 

3490 huper* = "NO":LOCATE 4,8:PR 1NT"Hyperspa £30943 
ce: "}huper$ 

3500 PEN 11:LOCATE 5,10:PRINT"PART-1:" :PE £28973 
N 0 

3510 FOR n*30 TO -200 STEP -2:PL0T l,n,7:D £51423 

RAW 60,n:PLOT 580,n:DRAW 640,n:NEXT 

3520 PEN 9:LOCATE 20,10:PR INT"P":LOCATE 20 £71793 

,12:PR INT"R":LOCATE 20,14:PR I NT"I":LOCATE 

20,16:PR INT"D":LOCATE 20,18:PR INT"E":PEN 0 

3530 PLOT 60,-200,8:DRAW 60,30:DRAW 580,30 £32813 

:DRAU 580,-200:DRAW 60,-200 

3540 ORIGIN 0,0:PLOT 512,350:DRAW 512,400, £91223 
1:PLOT 300,350:DRAW 300,400:PLOT 1,1:DRAW 
1,399;DRAW 639,399:DRAU 639,1:DRAW l,l:PLO 
T 580,232,1:DRAW 580,340:PLOT 60,232:DRAW 
60,340 

3550 PEN #2,12:PAPER #2,0:PR1NT #2:PRINT # £97473 
2:PR I NT #2," Die Suche":PRINT #2:PRINT # 

2:PR I NT #2," nach ":PRINT #2:PR1NT #2: 

PRINT #2," Prokyon..." 

3560 IF JOY(0)=16 OR INKEY(71>=0 THEN 357 £22153 
0 ELSE 3560 

3570 CLS #2:FOR n=l TO 50:PLOT RND«516+62, £51723 
RND»226+2,hik:fa=fa+l:IF fa>=2 THEN fa=0 


3580 IF f a = 0 THEN hik=i ELSE hik*7 £16453 

3590 NEXT n: £4823 

3600 GOTO 2220 £3673 

3610 REM Phase 1 £7183 


3620 ORIGIN 0,40:uy = 20:b=RND»600+20: x = RND» £2564 3 
600:a=RND#600 

3630 huf = b-uy:ox = 38:oy=60 : BORDER 0,1 «.zeit £54283 
= 190:zuf gek=I NT ( RND« 14+ C ba Iler«2>) 

3640 FOR n=-38 TO 190 STEP 2:PL0T 20,n:DRA £24693 


W 40,n,11:NEXT 

3650 PLOT 60,-40:DRAW 580,-40,8 £18993 

3660 h*=eigl<:iEXC,38,oy*i,Qh$,2 £16803 

3670 LOCATE 14,6:PRINT INT(entf) £13653 

3680 LOCATE 16,8:PRINT huper* £6903 

3690 PLOT 20,zeit:DRAW 40,zeit,7 £8543 

3700 !PUT,ox*1,oy* 1,9h$,1 £12313 

3710 SPEED INK 1+entf/10,1+entf/9 £17823 

3720 SOUND 2,15,20,8,5,9,8 £16643 


3730 soun=soun+1:IF soun=4 THEN soun*0:SOU £23583 
ND 4,entf+50,25,0,3,8 

3740 IF JOY(0> =8 OR INKEYC1)=0 THEN x = x + 2 £35653 
:ox=ox+l:lF ox>40 THEN ox=40 
3750 IF JOY(03=4 OR INKEY(8>=0 THEN x=x-2 £35793 
:ox=ox-l:IF ox<36 THEN ox=36 
3760 h*=elgl*:!EXC,ox*1,oy«1,0h*,2 £23553 

3770 huper#-"NO " £6583 

3780 IF x>a THEN hup=x-a ELSE hup=a-x £17673 

3790 huf=huf-l:zeit=zelt-0.2:IF zelt<-38 T £35793 
HEN GOTO 4510 

3800 IF JOY(0> = 16 OR !NKEY(71>=0 AND zslt< £40633 
188 THEN huf =50:LOCATE 16,8:PR INT"YES":GOS 
UB 3840 

3810 entf = SQR(hup»hup+ huf »huf) £10583 

3820 IF entf<5 THEN 3970 £13973 

3830 GOTO 3670 £6743 


3840 SOUND 1,378,150,15,5,3,6 £15213 

3850 PLOT 280,80:DRAW 240,90,11:PLOT 280,5 £132123 
0:DRAW 240,40:PLOT 380,80:DRAW 420,90:PLOT 
380,50:DRAW 420,40:PLOT 260,65:DRAW 240,6 
7,1:PLOT 390,65:DRAW 410,67:PLOT 300,90:DR 
AW 280,100:PLOT 35O,90:DRAW 370,100,1:PLOT 
320,40:DRAW 310,20:PLOT 34O,40:DRAW 350,2 

0 

3860 FOR n=i TO 50:NEXT n £10973 

3870 PLOT 240,90:DRAW 200,100:PLOT 240,40: £124893 
DRAW 200,30:PLOT 420,90:DRAW 460,100,1:PLO 
T 420,40:DRAW 460,30:PLOT 240,67,1:DRAW 22 
0,69:PLOT 410,67:DRAW 430,69:PLOT 280,100: 

DRAW 260,110;PLOT 370,100:DRAW 390,110:PLO 
T 310,20:DRAW 300,4:PLOT 350,20:DRAW 360,4 
3880 FOR n=1 TO S0:NEXT n £10973 

3890 PLOT 200,100:DRAW 120,120:PLOT 200,30 £106653 
,1:DRAW 160,20:PLOT 460,100,8:DRAW 540,120 
:PLOT 460,30,8:DRAW 500,20:PLOT 220,69,1:D 
RAW 180,73:PLOT 430,69:DRAW 470,73:PLOT 26 
0,110:DRAW 240,120:PLOT 390,110:DRAW 410,1 
20 

3900 FOR n=1 TO 50:SOUND 2,15,2,8,5,9,8:NE £50013 
XT:SOUND 1,178,150,15,5,2,5 :F0R n=l TO 20 
0:NEXT 

3910 PLOT 280,80:DRAW 240,90,0:PLOT 280,50 £160863 
:DRAW 240,40:PLOT 380,80:DRAW 420,90:PLOT 
380,50:DRAW 420,40:PLOT 260,65:DRAW 240,67 
:PLOT 390,65:DRAW 410,67:PLOT 300,90:DRAW 
280,100:PLOT 350,90:DRAW 370,100:PLOT 320, 

40:DRAW 310,20:PLOT 340,4O:DRAW 350,20 
3920 FOR n=1 TO 50:NEXT £9473 

3930 PLOT 240,90:DRAW 200,100,0:PLOT 240,4 £152003 
0:DRAW 200,30:PLOT 420,90:DRAW 460,100:PLO 
T 420,40:DRAW 460,30:PLOT 240,67:DRAW 220, 

69:PLOT 410,67:DRAW 430,69:PLOT 280,100:DR 
AW 260,110:PLOT 370,100:DRAW 390,110:PLOT 
310,20:DRAW 300,4:PLOT 350,20;DRAW 360,4 
3940 FOR n=l TO 50:NEXT C9473 

3950 PLOT 200,100,0:DRAW 120,120:PLQT 200, £99753 

30:DRAW 160,20:PLOT 460,100:DRAW 540,120:P 
LOT 460,30:DRAW 500,20:PLOT 220,69:DRAW 18 
0,73:PLOT 430,69:DRAW 470,73:PLOT 260,110: 

DRAW 240,120:PLOT 390,110:DRAW 410,120 
3960 RETURN £5553 

3970 REM erreicht £5833 

3980 PEN 11:LOCATE 13,10:PR I NT"<OK>" :PEN £28373 

0 

3990 BORDER 0:FOR n=l TO 100: SOUND 2,15,2 £42163 
,8,5,9,8:NEXT:SOUND 2,15,250,15,5,9,8 
4000 PLOT 310,100,12:DRAW 330,100:FOR n=l £13881 
TO 100:NEXT 

4010 PLOT 300,100:DRAW 340,100,12:PLOT 310 £44843 

,98:DRAW 330,98 :FOR n=l TO 100:NEXT 

4020 PLOT 290,100:DRAW 350,100,12:PLOT 300 £40263 

, 98:DRAW 340,98 :FOR n=l TO 100.-NEXT 

4030 1 PUT,ox«i,oy»l,0h*,l:h2#=eig4*:oy=oy+ £35553 

2:!EXC,ox«l,oy«l,0h2*,2 

4040 PLOT 280,100:DRAU 360,100:PLOT 290,98 £26633 
:DRAW 350,98:FOR n=l TO 100:NEXT 

4050 !PUT,ox«1,oy*1,0h2#,I:h3#=eig5$:oy=oy £30051 
+2:IEXC,ox»l,oy«l,0h3#,2 

4060 kI3*=kIa3*:!EXC,20,100,0k13#,2 £11993 

4070 PLOT 260,100:DRAW 380,100:PLOT 270,98 £39843 
:DRAW 370,98:PLOT 290,96:DRAW 360,96:FOR n 
=1 TO 100:NEXT 

4080 PLOT 250,100:DRAW 390,100:PLOT 260,96 £36193 
:DRAW 380,96:PLOT 270,94:DRAW 370,94:FOR n 
=1 TO 100:NEXT 

4090 pl2*=pla2§:!EXC,18,100,0pl2#,2 £23793 

4100 !PUT,ox * 1,oy*1,0h3$,1:score =I NT <(zeit £41763 
+40)/4):FOR n*l TO 300:NEXT 

4110 GOSUB 4130:R£M goto Auswertung £32263 

4120 FOR n=1 TO 1000:NEXT:GOTO 2230 :REM P £33213 
hase 2 

4130 REM Auswertung £7983 

4140 score=score+tr:IF treffer=zufgek THEN £39541 
seore=score+jae«3 

4150 PEN 8:LOCATE 6,2:PRINT score:LOCATE 6 £72221 
,3:PR I NT jae:LOCATE 14,2:PRINT torpedo:LOC 
ATE 14,3:PRINT treffer 

4160 ORIGIN 0,0:PLOT 512,350:DRAW 512,400, £33513 
1:PLOT 300,350:DRAW 300,400:ORIGIN 0,40 


4170 IF treffer=zufgek THEN GOTO 4210 £21933 

4180 IF Jae = 0 THEN GOTO 4510 C5783 

4190 tr*0 £2123 

4200 RETURN £5553 
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[—Programme 


4210 DR IG 1N 0,0 s SOUND 1,15,2,8,5,9,8:REM * [2060] 
«»»Phase 3»«»»* 

4220 GOSUB 4560 [841] 

4230 LOCATE 13,10:PEN 11:PRINT"<QK>”:CLS # [148873 
2}PR I NT #2:PR I NT #2:PRINT #2," Sie haben 
w :PRINT 12;PRINT #2," Prokyon"sPRINT #2 
SPRINT #2," erreicht."sPRINT *2:PRINT #2 
sPRINT #2," Achtung!!"sPRINT #2sPRINT # 

2," Meteoriten. .. "sPLOT 60,1:DRAU 580,1,8 
4240 PEN 0sIF JOY(0)=16 OR INKEY(71>=0 THE [41903 
N 4250 ELSE 4240 

4250 LOCATE 13,10;PRINT" "sCLS #2sINK C78413 

0,0 sINK 1,26 sINK 7,10sINK 8,15s[NK 9,lsIN 
K 10,25 sINK 11,6:INK 12,llslNK 13,12»INK 1 
5,1,0sSPEED INK 1,1s INK 15,11 

4260 LOCATE 5,10:PEN 11:PRINT"Part-3s ":PE £3936 3 


N 0 s FOR n*2 TO 6:INK n,l:NEXT 

4270 FOR n=l TO 50:PLOT RND*520+60,RND*228 C31663 
, hik 

4280 fa=fa+1sIF fa = 2 THEN fa = 0 [15003 

4290 IF fa=0 THEN hik=7 ELSE hik=l [22473 

4300 NEXT £3503 

4310 PLOT 60,1,8:DRAW 60,230:DRAW 580,230: £24853 
DRAU 580,1:DRAU 60,1 

4320 ORIG IN 0,-30 £177 3 

4330 FOR n=180 TO 2 STEP -2:PL0T 320,180:D £48943 
RAU 64,n,1sPLOT 320,180:DRAU 576,nsNEXT 
4340 fa*9:F0R n=62 TO 320 STEP 2:PLOT 320, £30893 
180:DRAU n,2,fa:PLOT 320,180:DRAU 640-n,2 
4350 IF n*200 THEN fa=15 £8093 

4360 NEXT £3503 

4370 x=4:y*2.8:yy=3:k*l.l:p=i.l:fa a 2 £19903 

4380 FOR n = l TO 50:PLOT 320-x,180-y,fasDRA £58443 


U 320-x,180-y-yysPLOT 320 + x,180-ysDRAU 320 
+x,180-y-yy 

4390 x=x*k:y=y*p:yy=yy*p:fa=fa+i:IF fa=7 T £35013 


HEN fa=2 

4400 NEXT £3503 

4410 PLOT 60,31:DRAU 580,31,8 C20113 

4420 f a=2:INK 15,11,10:INK 1,26,25 £9653 

4430 EVERY 6 GOSUB 4450 £2173 

4440 GOTO 4710 £5393 


4450 IF fa=2 THEN fa*fa+l:lNK 2,0:INK 3,1: £20323 
INK 4,1t INK 5,1:INK 6,1tRETURN 

4460 IF f a = 3 THEN fa=fa+l:lNK 2,1:INK 3,0: £22293 
INK 4,1:INK 5,1:INK 6,1:RETURN 

4470 IF fa=4 THEN fa-fa+ltINK 2,1:INK 3,1: £33113 
INK 4,0:INK 5,1:INK 6,1:RETURN 

4480 IF f a*5 THEN fa=fa+i:INK 2,1:INK 3,1: £28023 
INK 4,1:INK 5,0:INK 6,1:RETURN 

4490 fa=fa+1:INK 2,i:INK 3,1:1NK 4,1:INK 5 £26113 
,1:INK 6,0:fa=2:RETURN 

4500 GOTO 4500 £3253 

4510 SOUND 1,200,100,7:F0R n=l TO 500:NEXT £137763 
:CLS #2:PR I NT #2:PRINT #2:PRINT #2:PRINT # 

2," Sie haben den":PRINT #2:PRINT #2," 

Auf trag"sPRINT #2:PRINT #2," nicht erfuell 
t.":PR1NT #2:PR 1 NT #2:PRINT #2,"UiederhoIe 
n(J/n)" 

4520 ORIGIN 0,0:PLOT 60,1:DRAU 580,1,8:PLO £32263 
T 578,4:DRAU 578,200,0 

4530 ream*REMAIN (0) £8693 

4540 aw*=INKEY*:IF aw*«"j" THEN GOSUB 560 £18803 
0: RUN 

4550 IF aw*="n" THEN 5610 ELSE 4540 £10893 

4560 ream=REMAIN C0):INK 15,1:S0UND 2,15,2 £28113 
50,15,5,9,8 

4570 FOR n*i TO 2:h**eigl*:!EXC,x*1,y*1,8h £56313 
*, 2:CALL S«BD19:FOR t = l TO 50 :NEXT: I PUT, X» 1 
,y«l,8h*,1:y=y+4:NEXT 

4580 FOR n=1 TO 3:h4*=eig4*:!EXC,x*1,y*1,8 £64553 
h4*,2:CALL &BD19-.F0R t*l TO 40:NEXT:!PUT,x 
»1,y*l,8h4*,1:y=y+2:NEXT 

4590 FOR n=1 TO 3:h5*=eig5*:!EXC,x*1,y«1,0 £68543 
h5*,2:CALL &BD19:F0R t=l TO 25:NEXT:!PUT,x 
* 1,y*l,Sh5*,i:y=y+l:NEXT 

4600 FOR n=1 TO 1000:NEXT:INK 15,0:FOR n=2 £24033 
TO 6:INK n,0:NEXT 

4610 h*=eigl*:1EXC,42,50,©h*,2:CALL &BD19: £44563 
1a1*=k1a3*:iEXC,34,90,81al*.2 

4620 SOUND 4,15,250,15,5,9,8 £14753 

4630 FOR n=l TO 100:NEXTs!PUT,42,50,8h*.1: £29673 
!PUT,34,90,01al*,1 

4640 h2*=elg4*:!EXC,42,54,0h2*,2:CALL &BD1 £52033 
9:1a2*=k1a2*:!EXC,34,90,81a2*,2 

4650 FOR n=1 TO 120:NEXT:!PUT,42,54,0h2*,1 £40093 
:!PUT,34,90,81a2*,1 


4660 h3*=eig5*:!EXC,42,58,6h3*,2:CALL &BD1 £45243 
9:1a3* = p1a2*:!EXC,34,90,01a3*, 2 

4670 FOR n=1 TO 150:NEXT:!PUT,42,58,9h3*,1 £33843 
: !PUT, 34,90,01a3*,1 

4680 la4*=»pla*i!EXC,34,90,01a4*,2 £19863 

4690 FOR n=1 TO 2000:NEXT £10953 

4700 RETURN £5553 

4710 ORIGIN 0,40:REM »««Phase 3»»» £10403 

4720 x=36:y=34 :ax=36:geghi=0:xx=39:yy=78: £61533 
zx=RND»4-2:zy=8:zufy=0:zuf x=0:zugg =I NT C RND 
*8+20) 

4730 h*=eigl*:IEXC,x«i,y«l,0h*,2:sch2*=sch £64053 
at2*:IEXC,x*l+l,9,@sch2$,2:gegan=gegan+l:l 
F gegan>zugg THEN 5270 

4740 REM £2723 

4750 SOUND 1,12,20,8,5,9,8 £17663 

4760 geghi*geghi+1:IF geghi>=ll THEN !PUT, £87253 
xx*l+zufx-zx,yy»l-zufy+zy,0k!3*,l :geghl=1 
:zx=RND»4-2:zy=8:zufy=0:zufx=0:gegan=gegan 
+1: IF gegan>zugg THEN uff=y:GOTO 5270 
4770 IF geghi<4 THEN GOSUB 4990 ELSE GOSUB £21833 
5020 

4780 zufy=zufy+zy:zufx=zufx+zx £18883 

4790 IF ABS(x-<xx+zufx-1))<6 AND yy-zufy- £41503 
y<4 THEN GOSUB 5130:GOTO 4720 

4800 IF INKEY(71)=0 OR JOY(0)=16 AND yy-zu £32323 
fy-y>12 THEN GOSUB 5040 

4810 IF JOY(0)=4 OR INKEY(8)=0 AND yy-zufy £32433 
-y>4 THEN GOSUB 4870 

4820 IF JOY(0)=8 OR INKEY(1)=0 AND yy-zufy £33353 
-y>4 THEN GOSUB 4900 

4830 IF JOY(0 >-2 OR INKEY<2)=0 AND yy-zufy £29633 
-y>4 THEN GOSUB 4930 

4840 IF JDY(0> = 1 OR INKEY(0)=0 AND yy-zufy £30293 
-y>4 THEN GOSUB 4960 

4850 PLOT 20,zeit:DRAU 40,zeit,7:zeit=zeit £33323 
-0.2:IF zeit<=-38 THEN 4510 


4860 GOTO 4740 £5013 

4870 !PUT,x*i,y*i,0h*,1 £12973 

4880 ax=x:x=x-2:IF x<=28 THEN x=28 £19853 

4890 h* = eigl* :iEXC,x«l,y«l,@h*,2:!PUT,sx* £43493 
1+1,9,0sch2*,1:gch2*=schat2*:!EXC,x*l+l,9, 

0sch2*,2:RETURN 

4900 !PUT,x*1,y*i,©h*,1 £12973 

4910 sx=x:x=x+2:IF x>=44 THEN x=44 £30883 

4920 h*=eigl* :!EXC,x»i,y«l,0h*,2:!PUT,sx* £43493 
1+1,9,0sch2*,1:sch2*=schat2*:!EXC,x»1+1,9, 

0sch2*,2:RETURN 

4930 !PUT,x*l,y*l,0h$,1 £12973 

4940 y=y+4:IF y>=40 THEN y=40 £20803 

4950 h*=eigl*:!EXC,x»l,y»l,0h*,2:RETURN £19743 

4960 !PUT,x*l,y»l,@h*,l £12973 

4970 y=y-4:IF y< = 22 THEN y-22 £16263 

4980 h*=eigl*:!EXC,x«l,y«l,0h*,2:RETURN £19743 


4990 IF geghi-1 THEN k11 *-k1a3*: !EXC,xx»1 £46463 
+zufx,yy«l-zufy,©kll*,2:RETURN 

5000 IF geghi=2 THEN !PUT,xx»1+zufx-zx,yy £78943 
*l-zufy + zy,0kl1*.1:kI2* = kIa2*:!EXC, xx»l + zu 
fx,yy«l-zufy,0kl2*,2:RETURN 

5010 IF geghi*3 THEN I PUT,xx*1+zufx-zx,yy £37373 
*l-zufy+zy,0kl2*,1:kI3*=pla2*:!EXC,xx*i+zu 
f x,yy*1-zufy,0k13*,2:RETURN 

5020 !PUT,xx*l+zufx-zx,yy*l-zufy+zy,@k13*, £31923 
1 

5030 kl3*=pla2*:IEXC,xx*l+zufx,yy*1-zufy,© £39223 
kl 3*,2:RETURN 

5040 schu*=3cheig*:!EXC,x*i*1,y*l+16,©achu £43643 
*,2:SOUND 2,200,30,15,1,3,3 

5050 CALL &cBD19: iPUT,x* 1 +1,y*1♦16,@schu*,1 £11489 
:IF ABS(x-(xx+zufx))<4 AND yy-zufy-y<20 T 
HEN treffer=treffer+l:GOSUB 5070:geghi=0:z 
x = RND*4-2:zy=8:zufy=0:zufx=0:gegan*gegan + l 
:RETURN 

5060 RETURN £5553 

5070 !PUT,xx*l+zufx-zx,yy*l-zufy+zy,0k13*, £31923 
1 

5080 bum2*=exp2*:!EXC,xx*l+zufx-zx,yy*l-zu £76883 
fy + zy, 0bum2*,2:CALL *<BD19:S0UND 4,1911,30, 

13,2,8,15:FOR n=i TO 100:NEXT 

5090 !PUT,xx*l+zufx-zx,yy*l-zufy+zy,0bum2* £31273 
, 1 

5100 bum*= , expl* : i EXC, xx*l + zuf x-zx, yy* 1-zuf £62853 
y + zy, ©bum*, 2:CALL 8<BD19:S0UND 4,1911,160,1 
5,5,8,15 :FOR n=l TO 100:NEXT 

5110 !PUT,xx*l+zufx-zx,yy*l-zufy+zy,©bum*, £99163 
1:bura2*=exp2*:!EXC,xx*l + zufx-zx, yy*1-zufy + 
zy, ©bum2*, 2:CALL SiBD19:F0R n=i TO 100:NEXT 
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5120 !PUT,xx*i+zufx-zx,yy*i-zufy+zy,0bum2* 
,1:tr3=10:GOSUB 5200:RETURN 
5130 REM ko 1 Iision 

5140 !PUT,x*l,y#l,0h*,1:IPUT,xx* 1+zufx-zx, 
yy*l-zufy+zy,©kl3*,l:IPUT,x*1+1,9,@sch2*,1 
5150 bum2*=exp2*: !EXC,x* 1,y*1,0bum2*,2:CAL 
L &BD19:SOUND 4,1911,30,13,2,8,15:FOR n=l 
TO 100:NEXT 

5160 iPUT,x*1,y*1,@bum2* , 1 
5170 bum*=expl*:lEXC,x* 1,y*1,©bum*,2:CALL 
&<BD19 i SOUND 4,1911,160,15,5,8,15 :FOR n=l 
TO 100:NEXT 

5180 !PUT,x*1,y*1,@bum*,1:bum2* = exp2* : 1EXC 
, x*l,y»1.0bum2*,2:CALL &BD19:F0R n = l TO 10 
0:NEXT 

5190 iPUT,x* 1,y*1,0bum2*, 1 :!PUT, x*1, y*l, © 
h*.1:jae=jae-i:GOSUB 5200:RETURN 
5200 REM Auswertung 3 
5210 score=score+tr3 

5220 PEN 8:LOCATE 6,2:PRINT score:LOCATE 6 
,3iPR I NT jae:LOCATE 14,2:PRINT torpedo:LOC 
ATE 14,3:PRINT treffer 

5230 ORIGIN 0,0:PLOT 512,350:DRAU 512,400, 

1:PLOT 300,350:DRAW 300,400:ORIGIN 0,40 

5240 IF jae=0 THEN GOTO 4510 
5250 tr3=0:BORDER 0 
5260 RETURN 

5270 SOUND 4,300,50,0,3,8:LOCATE 17,2:PRIN 
T”0 N":sx=x: !PUT,x* 1,y* 1,0h*,1: !PUT,sx*l + l 
,9,©sch2*,i:sx=36:x=36:h*=elgl*:IEXC, x*l,y 
*1,©h*.2:sch2*=schat2*:IEXC,x*1+1,9,0sch2* 

,2:REM *****Phase 3.b******** 

5280 IF INKEY(2)=0 OR JOY<0)=2 THEN GOSUB 
4930 

5290 IF INKEY(0)=0 OR JOY(0)=1 THEN GOSUB 
4960 

5300 IF INKEY(71)=0 OR JOY(0)=16 AND torpe 
do>0 THEN GOSUB 5350 

5310 PLOT 20,zeit:DRAW 40,ze1t,7:zelt=zeit 
-0.2:IF zeit<=-38 THEN GOSUB 5200:GOTO 451 
0 

5320 IF torpedo<1 THEN'4510 
5330 SOUND 1,12,12,8,5,9,8 
5340 GOTO 5280 

5350 try=0:trx=38:SOUND 2,200,60,15,1,3,3 
:FOR n=1 TO 2:tr1 * = torpi*: !EXC,trx* 1,y*1 +1 
6+try,©trl*,2:CALL &BD19 

5360 IPUT,tr x*1,y*l+16+try,©tri*,l:try=try 
+4:NEXT 

5370 FOR n = 1 TO 3:tr2* = torp2*: IEXC,trx* 1,y 
*l+16+try,©tr2*,2:CALL &BD19 
5380 !PUT,trx*l,y*l+16+try,0tr2*,1:try=try 
+4:NEXT 

5390 FOR n = 1 TO 3:tr3* = torp3*: IEXC,trx* 1 +1 

,y*l+16+try,Str3*,2:CALL &BD19 

5400 IPUT,trx*i+l,y*l+16+try,etr3*,l:try=t 

ry+4:NEXT:torpedo=torpedo-1 

5410 IF y=30 THEN BORDER 6,26:tr3=100:tref 

fer=treffer+1:GOSUB 5200:GOTO 5470 

5420 IF y<30 THEN GOSUB 5440 

5430 GOSUB 5200:RETURN 

5440 bum2*=exp2*:IEXC,38,y*i+16+try,0bum2* 
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,2:CALL &BD19:S0UND 4,1911,160,15,5,8,15 : 
FOR n=1 TO 100:NEXT 

5450 1 PUT,38,y*1 +16+ try,0bum2*,1:RETURN 

5460 REM - 

5470 SOUND 4,1911,160,15,5,8,15:F0R n=l TO 
70:SOUND 1,12,3,8,5,9,8:NEXT:ream=REMAIN 
(0):INK 15,11:INK 1,26:en*=enl*:!EXC,37,77 
,©en*,2:IPUT,x*l,y»l,0h*,1:SOUND 2,15,250, 
15,5,9,8:IPUT,sx*1+1,9,0sch2*,1 
5480 FOR n = i TO 3:h* = eigl *: IEXC,x*1,y* 1,©h 
*, 2:CALL 8<BD19:F0R t=l TO 50: NEXT : I PUT, x* 1 
,y*l,0h*, 1 :y=y+5:NEXT 

5490 x=x+1:FOR n=l TO 4:h4*=eig4*:IEXC,x*1 

, y* 1,0h4*, 2 : CALL &BD19.-F0R t = l TO 40:NEXT: 

IPUT,x * 1,y*1,0h4*,l:y = y + 5:NEXT 

5500 x = x+1:FOR n=l TO 4:h5* = elg5*: IEXC,x*1 

,y*1,0h5$,2:CALL &BD19:F0R t=l TO 25:NEXT: 

IPUT,x*l,y*l,0h5*,1:y=y+4:NEXT 

5510 FOR n=1 TO 400:NEXT:CLS #2:0RIGIN 0,0 

:FOR n=l TO 25:PL0T RND*516+62,RND*226+2,h 

i k: f a=*f a+1:IF fa> = 2 THEN fa=0 

5520 IF fa=0 THEN hlk=7 ELSE hlk=l 

5530 NEXT 

5540 p1* = p1a*: IEXC,37,77,0pI *,2:FOR n=l.TO 
400:NEXT:bum*=exp2*:IEXC,39/77,©bum*,2:SO 
UND 4,1911,30,13,2,8,15:F0R n=l TO 120:NEX 
T:I PUT,39,77,©bum*,1: I PUT,37,77,0p1 *,1:bum 
2*=expl*:IEXC,37,77,Qbum2*,2:SQUND 4,1911, 
160,15,5,8,15 :FOR n=l TO 150:NEXT 
5550 IPUT,37,77,0bum2*,1:bum*=exp2*:IEXC,3 
9,77,©bum*,2:FOR n=l TO 120:NEXT: I PUT,39,7 
7,©bum*,1 

5560 LOCATE 13,10:PR I NT"<OK>” :PEN 0:GOSUB 
5620 

5570 FOR n=1 TO 1000:NEXT:CLS #2:F0R n=l T 
0 4:PR I NT #2:NEXT:PR I NT #2,"Wlederho!en(j/ 
n>":ORIGIN 0,0:PLOT 60,1:DRAW 580,1,8:PLOT 
578,4:DRAW 578,200,0 

5580 aw**INKEY*:IF aw*="J" THEN GOSUB 560 
0: RUN 

5590 IF aw*-"n" THEN 5610 ELSE 5580 

5600 CLS #2:FOR n=l TO 4:PRINT #2:NEXT:PRI 

NT #2," Bitte wartenI":RETURN 

5610 CALL 0:REM keine Wiederholung 

5620 1aut=15:FOR n=i TO 8:SOUND 1,239,3,1a 

ut,4,7:SOUND 1,213,3, I aut,4,7:SOUND 1,190, 

3,laut,4,7:SOUND 1,213,3,laut,4,7:laut*lau 

t-1:NEXT:FOR n=l TO 500:NEXT:CLS #2 

5630 IF score>380 AND score<430 THEN befe* 

=" Leutnant " 

5640 IF score>*430 AND score<480 THEN bef 
e*=" Commander " 

5650 IF score>*480 THEN befe*=" Capta 

in " 

5660 PRINT #2:PR I NT #2:PRINT #2,"Sie haben 
Ihren":PR I NT #2:PRINT #2,"Auftrag erfuell 
t" 

5670 IF score>380 THEN PRINT #2:PR1NT »2," 
und werden zum":PRINT #2:PEN #2,i:PRINT # 
2,befe*:PEN #2,12:PRINT #2:PRINT #2," be 
foerdert." 

5680 IF JOY(0> = 16 OR INKEY<71)=0 THEN RETU 
RN ELSE 5680 


[17393 

[13823 

[86123 


[6262] 


[73863 


[64693 


[5580] 


[22471 

[350] 

[137543 


[52733 

[3260] 

[94633 

[1880] 

[11873 

[43473 

[10993 
[90613 

[32763 

[33081 

[39903 

[45193 

[70893 

[26483 


c s Schneider-Computer- 
Kredit. 

Jetzt können Sie sich Ihren w 
Computertraum noch leichter l ' ' 
erfüllen. Mit Hard- und 
Software und allem, was dazu 
gehört. 

Fragen Sie den Schneider-Fachhändier oder 
fordern Sie - unverbindlich für Sie - Unterlagen an. 


Selbstbau-Plotter 

PL22/B 

Geschwindigkeit max 60mm/s - Auflösung 0,06 mm 
Genauigkeit besser 0,09 mm - Format DIN A3 
Mechanik: Ganzmetall, Linearkugellager, Schrittmotore, 
Zahnriemen, höchste Präzision, robuste Ausführung 
Prozessor: hochintelligenter Z80-Rechner, Centronics Schnittstelle 
Software: im 16 K-EPROM, 44! Neue Plottbefehle, z B : 3D-Grafik, 
3 Schriftsätze, 2-typen, Interpolation Zoomen, relatives/absolutes 
Positionieren usw. 

Weiteres: Gehäuse, Zeichenwerkzeuge, Netzteil usw 
Preis: Immer noch nur 619,95 DM (Mechanikbausatz) 
Neugierig geworden? - Infogegen DM 1,60 in Briefmarken bei 
(siehe Bericht in CPC 8/86 





SKG BANK 

- Computer Kredit - 
Postfach 321 

6600 Saarbrücken (Tel. 0681/30301-0) 


Walter Kopisch 

Plotter und. Grafiksysteme - Hard-und Software - 
Buchbergstraße 37 - D-7712 Blumberg 1 
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I~ Kurse 



auf dem JOYCE (und andere) 
dBase II - ein effektiver Weg, 
Informationen zu speichern, zu 
verwalten und auszuwerten 

2. Folge: Dateien aufbauen, 
füllen und ansehen 

Sie werden sich erinnern, daß wir im 
ersten Teil dieser Serie über eher 
theoretische Fragen gesprochen 
haben. Es ging dabei vorrangig um 
die allgemeinen Funktionen eines 
Datenbanksystems, um Dateienstruk¬ 
turen sowie um wichtige Begriffe, die 
für die Arbeit mit solchen Systemen 
bekannt sein sollten. Jedoch haben 
Sie auch schon einiges über den Lei¬ 
stungsumfang des Datenbanksy¬ 
stems erfahren, mit dessen konkreter 
Beschreibung in dieser Folge begon¬ 
nen wird - über dBase II. 


Sicherungskopien 

Sie haben Ihr dBase II in Form eines 
kleinen Ordners erhalten, in dem, ne¬ 
ben einer umfangreichen Loseblatt¬ 
sammlung, eine Diskette zu finden ist, 
auf der sich dBase sowie mehrere 
Dienstleistungsprogramme befin¬ 
den. Bevor Sie etwas anderes begin¬ 
nen, sollten Sie von dieser Diskette 
unbedingt eine Kopie anfertigen - 
wie dies abläuft, ist zu Beginn des 
Handbuchs ausführlich erklärt. Soll¬ 
ten Sie darauf verzichten, laufen Sie 
stets Gefahr, beim versehentlichen 
Löschen einer Datei oder auch auf¬ 
grund irgendwelcher Defekte an der 
verwendeten Diskette Ihr dBase zu 
verlieren, und müßten sich ein weite¬ 
res Exemplar kaufen, um Weiterarbei¬ 
ten zu können. 

Dies gilt nicht nur für dBase selbst, 
sondern auch für sämtliche von 
Ihnen geschriebenen Programme 
und natürlich vor allem für Ihre Da¬ 
teien, so daß Sie sich wirklich ange¬ 
wöhnen sollten, zum Abschluß jeder 
Arbeit mit dBase über das CP/M- 
Hilfsprogramm DISCKIT oder auch 
mit dem Befehl PIP eine Kopie der 
benutzten Diskette anzufertigen. Zu 


diesem Zweck sollten Sie sinnvoller¬ 
weise PIP auf Ihre Arbeitsdiskette 
kopieren - vorausgesetzt natürlich, 
Sie haben dafür noch Platz - PIP be¬ 
legt 9 kB - und auch benutzen. Ihre 
dBase-Version gibt am Ende jeden 
Laufes die Meldung "Denken Sie an 
Ihre Datensicherung." aus, um Sie an 
diesen wichtigen Vorgang zu erin¬ 
nern. 


Größen 


Wenn Sie sich an den Vorschlägen 
des Handbuchs orientiert haben und 
neben den eigentlichen fünf dBase- 
Dateien "db.key”, "db.sub", "dba- 
se.com”, "dbasemsg.txt" und ”dba- 
seovr.com” auch die CP/M-Dateien 
”j???cpm3.ems”, "setkeys.com” und 
”submit.com” auf Ihre Arbeits¬ 
diskette kopiert haben, so können Sie 
nach dem Einschalten des Joyce ein¬ 
fach diese Diskette einschieben und 
auf das Erscheinen des Zeichens A>, 
des 'Systemprompts’, warten, mit dem 
der Joyce sich als betriebsbereit 
meldet. 

Diese acht Dateien belegen jedoch 
zusammen 172 kB auf Ihrer Diskette, 
so daß Ihnen für Ihre eigentliche Ar¬ 
beit nur ein kB (!) noch zur Verfü¬ 
gung steht. Zur Behebung dieses 
Dilemmas bieten sich verschiedene 
Möglichkeiten, doch für den Anfang 
empfehle ich Ihnen, auf die CP/M- 
Datei ’j???cpm3.ems"zu verzichten. 
Auf diese Weise gewinnen Sie immer¬ 
hin 41 kB freien Speicherplatz auf 
Ihrer Diskette, der für unsere Zwecke 
zunächst ausreicht. 


dBase starten 


Die Handhabung von dBase verän¬ 
dert sich dadurch lediglich in einem 
Punkt. Nach dem Einschalten des 
Geräts müssen Sie zunächst eine 
Kopie Ihres Betriebssystems, des CP/M’ 
(das Original befindet sich auf der 
Rückseite der Diskette, auf der Sie 
auch LocoScript gefunden haben), in 
das Laufwerk einführen. Nachdem 


sich CP/M mit dem A> gemeldet hat, 
nehmen Sie diese Diskette aus dem 
Laufwerk und legen Ihre dBase- 
Arbeitsdiskette ein. 
dBase wird nun durch den Aufruf 
db.sub <return> 

gestartet (Der Joyce und auch dBase 
können Ihre Befehle in der Regel erst 
in dem Moment lesen und mit der 
Ausführung beginnen, in dem Sie sie 
mit der <return>-Taste abschließen. 
Es ist also nicht angebracht, das Wort 
<return> auszuschreiben.) 

Nach kurzer Zeit werden Sie aufge¬ 
fordert, das Tagesdatum einzugeben 
oder erneut die <return>-Taste zu 
betätigen. Da wir das Datum vorerst 
noch nicht benötigen, gehen Sie bitte 
mit <return> weiter. 

Auf dem Bildschirm erscheint nun 
ein kurzer englischer Text, der Sie 
über bestimmte rechtliche Konse¬ 
quenzen, die mit dem Kauf dieser 
Software verbunden sind, informiert. 
Unmittelbar danach wird Ihnen am 
linken Rand des Monitors ein Punkt 
(.) angezeigt. Dieser Punkt entspricht 
in seiner Funktion dem CP/M-A>, 
dem wir weiter oben schon begegnet 
sind: er zeigt an, daß dBase bereit ist 
und auf Ihre Eingaben wartet. 


dBase verlassen 


Wenn Sie jetzt das Wort quit eingeben 
und mit <return> bestätigen, er¬ 
scheint auf dem Schirm die Meldung 
”*** Ende des dBASE II-Laufes ***. 
Denken Sie an Ihre Datensiche¬ 
rung." Jetzt befinden Sie sich wieder 
im Betriebssystem, können andere 
Programme aufrufen oder - nach der 
Entnahme der Arbeitsdiskette - den 
Rechner abschalten. 

Der Befehl ”quit” hat nebenbei die 
Funktion, sämtliche eröffneten Da¬ 
teien - seien es Programm- oder Da¬ 
tendateien - zu schließen. Daher kön¬ 
nen Sie nur durch die Verwendung 
dieses Befehls sichergehen, beim Ver¬ 
lassen von dBase keine unerwünsch¬ 
ten Datenverluste erleben zu müssen 
und auch Ihr dBase nicht zu beschä¬ 
digen. 


Datei anlegen 


Sobald Sie den dBase-Punkt auf dem 
Schirm haben, können Sie mit dem 
Befehl create eine Datenbank anle¬ 
gen. Nach seiner Eingabe - bitte ver¬ 
gessen Sie nicht, ihn mit <return> 
abzuschließen - fragt Sie dBase nach 
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SOFTWARE-JOYCE 


Carat-Auftrag 

Statistik 

Einkaufslisten mit Art.-Nr.. Bezeich¬ 
nung, Lagerbestand, EK-Preis, Wert je 
Artikel in DM. lfd.Umsatz in DM je 
Artikel. Verkaufslisten mit Umsätzen 
je Kunden, Artikelumsätze, lfd.Umsatz 
usw. 

Graphische Darstellung der Artikel¬ 
umsätze nach Artikelgruppen. 


Voreinsteijungen 

Laufwerke für Daten bestimmen, Formu¬ 
lare erstellen. Mahntexte. Mehrwert¬ 
steuersatze eintragen, Zahlungsbedin¬ 
gungsschlüssel erstellen. 


Art Ike 1verzei chn i s 

Einkaufspreise, VK 1. VK 2, Lagerbe¬ 
stand, Mindestbestand, Lieferanten 
an 2 eigen, Artikeletiketten, 52 Arti¬ 
kel gruppen. 


Kundenverze lehn ± £3 

Verwalten des Kundenstamms. Druck von 
Adressetiketten, Kundenlisten, Anzei¬ 
gen der Kunden am Monitor mit An¬ 
schrift. Preisstaffel. Umsatz. Betrag 
und Datum des letzten Umsatzes. 


Li eferaoten 

Lieferanten-Nr.. Firmenanschrift, 
Sachbearbeiter. Kunden-Nr., bisheriger 
Umsatz. Etiketten, Lieferantenliste. 


Einkauf - Beste! 1 we s e r\ 

Verwalten. Besteilvorschlagsliste. 

Bestei1-Nr., Bestell-Datum. Bestellungen 
im Stapel erfassen. 

Auftragsabwicklung 

Auftrags-Nr., Datum, Kunden-Nr.. Kun¬ 
denanschrift, Rabatt, Zahlungsbedin¬ 
gungen, Dialog-Fakturierung mit suchen, 
ändern, löschen, Auftragsfreigabe für 
Teillieferung, Druck von Auftragsbe¬ 
stätigungen. Lieferscheinen, Rechnun¬ 
gen. Gutschriften, automatische Be¬ 
standsfortschreibung in der Lagerhal¬ 
tung nach Schreiben der Rechnungen, 
Faktura-Journal. 


Lager 

Buchen der Lagerbewegungen. Ein- und 
Ausgänge. 8 Kostenstelien. Anzeiger 
der Buchungen, Druck des Bewegungs¬ 
journals. 


OP-Listen-Mahnwesen 

OP-Liste drucken. Anzeigen der Rechnun¬ 
gen, Rg.-Datum, Rechnungsbetrag. 

Fälligkeit, gezahlter Betrag. Zahlungs¬ 
datum. Restzahlung, automatisches 
Mahnwesen mit selbsttätiger Fort¬ 
schreibung der Mahnstufe. 

p jp- © i s DM 4 9 8, — 


Carat-Lager plus 


Voreinstellungen, Artikelverzeichnis 
Lieferantenverzeichnis, Bestei1wesen, 
Formularkopf und Formularfuß erstellen. 
Lagerverwaltung, Statistik, bestimmen der 
Datenlaufwerke, Artikelgruppen. Einkaufs¬ 
preise. Verkaufspreise. Lagerbestand. 
Mindestbestand. Buchen auf 8 verschiedene 
Kostenst.el len, Bestellungen verwalten. 
Erfassen von Bestellungen im Stapel, 
Lagerbewegungen anzeigen, drucken, 
reorganisieren. Umsatzlisten, Kosten- 
slel ienstatisti k, Art.i kelUmsatz 1 iste. 

Lieferantenumsatzliste, Kostenstellen¬ 
liste usw. 


± s DM 298, - 


CaratKasse plus 


Vorkontierung als vorbereitende Maßnahme 
zur Finanzbuchhaltung. Einnahmen- 
Ausgabenberechnung, Berechnung der 
ümsatzsteuervoranmeldung. statistisehe 
Auswertung einzelner Konten, sowie des 
Kassenbuches. Kapazität bei einem 
Laufwerk ca. 1000 Buchungen, beim Zweit- 
iaufwerk ca. 5000 Buchungen. Anlegen 
von Konten laut DATEV, Anzeigen von 
Buchungen für einen Tag.einen Monat, 
oder ein Jahr, automatisches Sortieren 
des Kassenbuches. 


Pre1S DM 198,- 


Weitere Programme 
uncl Branchen 1 ö s i_j n g e ra 
auf f rage ! 

Händler-Anfragen 
erwOrrsoLt • 

CARAT SOFT 

Systemberatung 



Inh. L). Donsbach 
Nelkenstr. 27 
Postfach 420115 
4600 Dortmund 41 
Tel.: 0231 / 40440 
Tlx.: B 227 369 medi 























I Kurse 


dem Namen der Datei, die Sie eröffnen 
wollen. Dieser Name darf maximal 
acht Zeichen lang sein und muß aus 
Buchstaben oder Zahlen bestehen 
sowie mit einem Buchstaben begin¬ 
nen; der Doppelpunkt ist nur erlaubt, 
wenn er von anderen Zeichen einge¬ 
schlossen wird. dBase fügt Ihrem Da¬ 
teinamen automatisch einen Punkt 
sowie die Kennzeichnung "dbf an, 
die für "data base file" steht 
("Datendatei”). 

Vor der Vergabe des Dateinamens 
sollten Sie sich vergewissern, daß Sie 
eine Datei gleichen Namens nicht be¬ 
reits auf der Diskette haben, da dBase 
ansonsten Ihre alten Daten über¬ 
schreibt und sie nicht zurückgewon¬ 
nen werden können. Auch sollten Sie 
beachten, daß dBase Dateibezeich¬ 
nungen, die länger als erlaubt geraten 
sind, nach dem achten Zeichen ab¬ 
schneidet. Aus den Namen "aus- 
lkundl” und ”auslkund2" kürzt es 
Ihnen also ’auslkund" zusammen, 
und überschreibt - sollten Sie beide 
Dateien unmittelbar nacheinander 
anlegen - die erste mit der zweiten. 


Festlegen der Dateistruktur 


Für den Anfang wollen wir uns ein 
einfaches Beispiel vornehmen, an 
dem sich schon viele der für dBase 
charakteristischen Eigenschaften er¬ 
kennen lassen - ein Telefonregister, 
das wir (wie sonst?) Telefon” 
nennen wollen. 

Sie können entweder auf die Bitte von 
dBase warten, diesen Dateinamen 
anzugeben, Sie können ihn aber auch 
ebensogut unmittelbar an den Befehl 
"create” anschließen; in beiden Fäl¬ 
len muß Ihre Namensgebung natür¬ 
lich mit <return> abgeschlossen 
werden. Darauf gibt Ihnen dBase auf 
dem Schirm Folgendes aus: 


Satzstruktur folgendermaßen eingeben 
Feld Name, Typ, Länge, Dezimalstellen 
001 


An dieser Stelle legen Sie die Eigen¬ 
schaften der 'Spalten' (Felder) in 
Ihrer Tabelle' (Datei) Telefon” fest, 
wobei für die Eigenschaften folgende 
Regeln gelten: 

Der Name darf aus maximal zehn 
Zeichen bestehen, unterliegt anson¬ 
sten jedoch den gleichen Bestimmun¬ 
gen wie schon der Dateiname. Als Da¬ 
tentyp akzeptiert dBase Felder, mit 
durch den Buchstaben ”c” (cha- 


racters) gekennzeichnete Zeichen¬ 
ketten. die alphanumerische Zeichen 
enthalten können und numerische 
Felder, die mit "n" (numbers) be¬ 
zeichnet werden. Im Gegensatz zu 
den alphanumerischen dürfen diese 
Felder lediglich Zahlen sowie - falls 
Sie dies festgelegt haben - den Dezi¬ 
malpunkt enthalten, da dBase mit 
diesen Feldern rechnen kann. Tele¬ 
fonnummern können Sie also unbe¬ 
sorgt in alphanumerischen Feldern 
deponieren, während etwa für Preise 
numerische angebrachter erschei¬ 
nen. dBase hat jedoch die Eigen¬ 
schaft, die Eingabe eines Wertes vom 
falschen Typ mit einer Fehlermel¬ 
dung zu quittieren, so daß Sie zur 
Kontrolle Ihrer Eingabe von dieser 
Trennung - wo es angebracht er¬ 
scheint - Gebrauch machen sollten. 
dBase II kennt noch einen dritten Va¬ 
riablentyp: die stets einstelligen logi¬ 
schen Werte (logicals, durch "1” ge¬ 
kennzeichnet), die lediglich zwei 
Zustände annehmen können: näm¬ 
lich ”y” (yes) oder "t” (true) für "ja" 
und "n” (no) oder 'T' (false) für 
'nein". Diese „Schalter" werden gerne 
zur Steuerung der Verarbeitung der 
Daten gebraucht; Sie werden gleich 
noch ein Anwendungsbeispiel se¬ 
hen. 

Im Feld Länge verlangt dBase von 
Ihnen die Festlegung der maximalen 
Zeichenzahl für das Feld, die Sie mit 
Sorgfalt kalkulieren sollten. Legen 
Sie die Felder nämlich zu kurz aus, 
werden Sie u. U. bis zur Unverständ¬ 
lichkeit kürzen müssen; bei zu lan¬ 
gen hingegen verschenken Sie - 
insbesondere in größeren Dateien - 
unnötig viel Speicherplatz. 

Überdies müssen Sie bei Feldern vom 
Typ ”n” beachten, daß Sie ein zusätz¬ 
liches Zeichen für den Dezimalpunkt 
einplanen müssen, sofern das ent¬ 
sprechende Feld über Dezimalstellen 
verfügen muß. Die Zahl der Stellen 
nach dem Komma (die Amerikaner 
ersetzen es bekanntlich durch den 
Dezimalpunkt) ist die vierte Angabe, 
die dBase von Ihnen erwartet. Sollten 
Sie auf Dezimalstellen verzichten 
wollen, können Sie die Angabe "0" 
einfach entfallen lassen. 

Die Eigenschaften müssen in der be¬ 
schriebenen Reihenfolge eingegeben 
werden, sie sind durch Kommata 
voneinander zu trennen und müssen 
für jedes Feld durch ein <return> ab¬ 
geschlossen werden. dBase stellt 
Ihnen nach dem <return> das näch¬ 
ste Feld zur Beschreibung auf dem 
Bildschirm dar; sollten Sie keine 
weiteren Felder festlegen wollen, 


drücken Sie einfach nochmals die 
Taste <return>. Damit ist die 
Struktur Ihrer Datenbank definiert. 


Telefonregister 

Lassen Sie uns das Gesagte nun auf 
unser erstes Anwendungsbeispiel, 
das Telefonregister, beziehen. Es soll 
folgende Informationen beinhalten: 
den Namen des Fernsprechteil¬ 
nehmers, seinen Wohnort, die 
Rufnummer sowie eine Angabe zu 
der Frage, ob dieser Anschluß ge¬ 
schäftlich oder privat genutzt wird 
(ob der Teilnehmer also nur tagsüber 
oder auch abends unter der angege¬ 
benen Nummer erreichbar ist). 

Ihr Dialog mit dBase liefe wie folgt ab 
(Ihre Eingaben sind kursiv darge¬ 
stellt): 

. create telefon 

Satzstruktur folgendermaßen eingeben 

Feld Name, Typ, Länge. Dezimalstellen 

001 vorname,c,15 

002 ort,c,20 

003 telnr.n, JO 

004 privat.l 

005 

Daten jetzt eingeben? 

Nachdem Sie dBase durch zweimali¬ 
ges Betätigen der <return>-Taste zu 
verstehen gegeben haben, daß die 
Strukturbeschreibung der Datei "te¬ 
lefon” abgeschlossen ist. stellt es 
Ihnen die Frage, ob Sie sofort mit der 
Dateneingabe beginnen wollen. Sollte 
dies der Fall sein, müssen Sie das "j" 
drücken, anderenfalls das "n" (er¬ 
wartet dBase von Ihnen lediglich die 
Eingabe eines Zeichens - bei Fragen 
wie dieser ist das die Regel - ist der 
Abschluß der Eingabe mit <return> 
überflüssig). Jede andere Eingabe 
provoziert das System zur Ausgabe 
eines Fragezeichens, nach dem Sie 
Ihren Fehler korrigieren können. 
<rcturn> ist hier gleichbedeutend 
mit "n"; auf beide Eingaben reagiert 
dBase II mit der Rückkehr zum 
Systempunkt. 

Sollten Sie hingegen das ' j” gewählt 
haben, wird der Bildschirm gelöscht 
und es erscheint - in der linken obe¬ 
ren Ecke beginnend - eine Maske, die 
ungefähr folgendes Aussehen hat: 

Satznummer 00001 
VORNAME: 

ORT: 

TELNR: 

PRIVAT : 
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Die Doppelpunkte begrenzen den 
Raum, den Sie für Ihre Eingaben zur 
Verfügung gestellt haben; er ist über¬ 
dies invers (hell) dargestellt. Sollte Sie 
diese Art der Darstellung irritieren, so 
müssen Sie noch vor der Eingabe des 
"create"-Befehls die Anordnung set 
intensitiy off <return> eintippen, 
womit Sie die inverse Darstellung des 
Eingaberaumes ausschalten. 


Daten eingeben 

Sobald oben gezeigtes Bild auf dem 
Monitor erscheint, steht der Cursor 
auf dem ersten Zeichen des ersten 
Feldes. Sie können sofort beginnen, 
einige Daten einzugeben, wobei Sie 
zur Korrektur von Tippfehlern 
zunächst die von LocoScript schon 
bekannten <delete>-Tasten verwen¬ 
den können. Sollte eine Eingabe 
nicht die volle Länge des Feldes be¬ 
anspruchen, so können Sie mit <re- 
turn> oder <enter> in das folgende 
gehen. Falls Sie ein Feld einmal bis 
zum Maximum ausgeschöpft haben, 
so meldet sich Joyce mit einem kur¬ 
zen akustischen Signal, wonach der 
Cursor in das nächste Feld springt. 


Die Dateneingabe beenden Sie auf 
die gleiche Weise, mit der Sie auch 
schon die Eingabe der Strukturdaten 
abgeschlossen haben: durch das 
Drücken der <return>-Taste, das zu 
erfolgen hat, wenn der Cursor im er¬ 
sten Feld des neuen Datensatzes 
steht. 

Sie werden sich sicherlich fragen, wie 
Sie denn nun Ihre Eingaben auf die 
Diskette sichern können. Nun, diese 
Arbeit nimmt dBase Ihnen ab - 
während der Dateneingabe bringt es 
in sehr kurzen Abständen Ihre Daten 
„in Sicherheit”. 


Daten ansehen 


Sie können sich nun auf sehr einfa¬ 
che Weise eine Liste Ihrer bisherigen 
Eingaben auf dem Bildschirm anse¬ 
hen. Dazu müssen Sie folgende Kom¬ 
mandos an dBase senden: 


list 

Keine Datenbank eröffnet, bitte Dateina¬ 
men eingeben: 
telefon <return> 


dBase müßte Ihnen jetzt ungefähr 
folgendes Bild zeigen: 


00001 

Andrea Braunschweig 

123 

.T. 

00002 

Martina Hannover 

321 

T. 

00003 

Christian Braunschweig 

222 

.F. 

00004 

Jochen Bremen 

213 

F. 

00005 

Bernhard Hannover 

333 

F. 


Soviel für heute. In der nächsten 
Folge werden Sie nähere Einzelhei¬ 
ten zur Technik der Dateiverwaltung 
erfahren. Sie werden eine Methode 
kennenlernen, auf bereits eingege¬ 
bene Daten zuzugreifen, etwa, um 
Eingabefehler zu korrigieren. Und 
Sie werden sehen, durch welche Be¬ 
fehle Sie nicht nur die Zahl der ange¬ 
zeigten Datenfelder verändern kön¬ 
nen, sondern auch, wie es möglich ist, 
aus der Datei bestimmte Informatio¬ 
nen schnell herauszusuchen - wozu 
schließlich benötigt man ein solches 
Datenbanksystem, wenn man doch 
noch immer endlose Listen durchse¬ 
hen müßte? 

(Walter Udo Everlien) 


MULTIFACE TWO 
Die Sensation 

Multiface 

- das Kopierprogramm 

Multiface two 

- 3 Funktionen in einem! 

- Vollständige Kopiereinrichtung lür Kassetten - 
Diskelten 

- Besteht aus 8K-Ram und 8K-Rom Erweiterung und 
wird lediglich auf aem Expansiorisporl Ihres CRC 
(464,664 6128) aufgesteckt 

- Wahlweises Kopieren von Kassette auf Diskette und umgekehrt, sowie von Kassette 
zu Kassette und Diskette zu Diskette. 

- Kopiert jedes im Speicher stehenoe Programm auf Kassette oder Diskette 

- Einsichtmöglichkeit in Programme und Hardware über Bildschirm 

- »Friert« sowohl Bild als auch Programm an jedem beliebigen Punkt ein, speichert 
es ab und macht späteren Zugriff möglich (hervorragend geeignet lür Gmlikan- 
wendungen) 

- Menügesteuert und vollständige Fchlerabsicherung 

- Komprimierte Datenabspeicherung, dadurch gehnger Bedarf an Speicherplatz auf 
Ihrer Kasselte oder Diskette. 

- Ladezeit von 64K Programmen: Diskette unter 20sec /Kassette unter Min 

- Reset-Taste eingebaut, beeinträchtigt nicht 8K-Ram Erweiterung 

- Weitere Anschicßmöglichkeiter. über Erweiterungsbus 

Preis 148,— DM 
Weitere Informationen auf Anfrage. 


PiZie-Data, H.-J. Piorreck 
Mittelstraße 61, Tel. (0 23 39) 71 91 
4322 Sprockhövel 2 



DISCOVERY PLUS • einzigartiger Tape to Dlsc Transfer 

Jetzt 4 Transferprogramme. Kopiert normale, headerlose, Speedlock und Turboload- 
Programme von Kassette auf Diskette, auch Programme, bei denen bishernichts zu machen" 
war. Alle Teile kinderleichtzu handhaben, ohne Programmierkenntnisse (auch für Anfänger). Mit 
100 Beispielen. Die Zeitschrift AMSTRAD-ACTION schrieb zum alten DiSCOVERY: „Probably 
the best tape to disc copier" 

Für CPC 464/664/6128 3 "-Diskette nur DM 59,90 

DISCUS DISCovery User Service. Insges. 160 Transferpro¬ 
blemlösungen in DISCUS 1 , 2 u. 3. Pro DISCUS DM 5,—. Bel separater Bestellung + DM 1,— 


HANDY MAN - 416 k auf 3 "-Diskette!!! 

60 k mehr auf jeder Diskette. Das Utilitypaket HANDY MAN schafft es Superschnelles Formatier- 
programm für alle Amsdos-Formate plus SUPERMAT202k u. SUPERMAT 20Bk. Die neuen For¬ 
mate sind voll softwareunterstützt. SUPERMAT läuft auch unter CP/M. Wahlfrei im Erst- oder 
Zweitlaufwerk. MENU MAKER Diskettenprogramme menügesteuert verwalten und starten (alle 
USER-Ebenen), DIRectory komplett „aufräumen" Weitere Utilities wie DISCSEARCH, FILESE- 
ARCH (Editorfunktion, String-Textsuche etc) lür alle Formate. Superschneller Backup von Dis¬ 
kette auf Kassette. 7 Programmet Ein Wahnslnns-Paketl 

Für CPC 464/664/6128 3 ' -Diskette nur DM 59,90 


MASTERDISC Disketten-Utilities, Transfer, Editor, Backup, etc. 

Backup von Disketten, auch illegale Sektoren, unformatierte Spuren usw Gelöschte Files retten. 
Alle Directory-Einträge editieren und verändern, Fast-Formatter, File-Copy, Sektor-Editor usw 
Insges 12 Super-Utlllttesll 

Spitzentools lür CPC 464/664/6128 3 "-Diskette nur DM 59,90 


DISC MATE - CP/M PLUS UTILITIES für den JOYCE, JOYCE PLUS 

Gelöschte Files retten und vor Löschen schützen. USER wechseln, etc. Files verstecken/sichtbar 
machen. DIRectory-Edltor Sehr komfortables und schnelles Kopierprogramm, Ideal für den 
schnellen Backup wichtiger Daten Laufwerks-Speedup um 20% 

Ein MuB für den JOYCE-User. 3 "-Diskette nur DM 79,90 


MIRAGE IMAGER ■ Die Hardwarelösung für Backup-Kopien 

Kopiert alle (!!!) Programme. Von Kass. auf Disk., Disk auf Disk., Disk, auf Kass Kopiert alles, 
einfach auf Knopfdruck. Für CPC 464/664/6128 

MIRAGEIMAGER DM219,— Adapterf. CPC6128 DM29,— 

3 -Zweitlaufwerk AMDRIVE 
zum Hammerpreis von DM 333,- 

(CPC-Typ angeben). 


Infos gegen DM 1,50 in Briefmarken. Bestellungen unter DM 120,- plus DM 3,- für Pono. 
Lieferung per Nachnahme (+ Gebühr) oder gegen Vorausscheck. Auslandsbestellungen gegen 
Vorausscheck. Telefonbestellung und Info von 9.00—10.00 und 15.00—18.30 Uhr. 

PR8-Softwaredienst Telefon 

Postfach, D-8702 Eisingen 09306/8735 



die Schneider- 
Utilities 
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Multiface Two 

Hersteller: Romantic Robot 
Vertrieb: Fachhandel 


Unter all den Modulen, die es in letz¬ 
ter Zeit für die CPC’s gibt, nimmt das 
„Multiface Two” einen Platz in der 
Oberliga derartiger Erweiterungen 
ein. 

Wie zumeist in solchen Fällen üblich, 
handelt es sich auch hier um einen 
unscheinbaren kleinen Kasten, der 
auf der einen Seite über ein Stück 
Rachbandkabel und einen Stecker 
an den Expansionsport angeschlossen 
wird. Das Diskinterface wird mit der 
Rückseite des Moduls verbunden. Da 
das. Multiface auch einige Features 
speziell für den CPC 6128 enthält, 
kann es natürlich auch an diesem 
Rechner problemlos betrieben wer¬ 
den. Dort wird es mittels eines Adap¬ 
ters an den Expansionsport ange¬ 
schlossen. In absehbarer Zukunft soll 
das Multiface zwar auch in einer 
speziellen 6128-Version erhältlich 
sein, aber wie gesagt, muß der An¬ 
wender derzeit auf den Adapter, was 
an sich kein Nachteil ist, zurück¬ 
greifen. 

Die wesentlichsten Leistungsmerk¬ 
male des Moduls sind eine Save- 
Funktion, 8K RAM-Erweiterung und 
eine Reset-Funktion. Die Save-Funk¬ 
tion -kann jederzeit, auch während 
der Rechner gerade ein Programm 
ausführt, durch einfaches Drücken 
der Stop-Taste, die sich auf der Ober¬ 
seite des Moduls befindet, aufgerufen 
werden. Durch das Betätigen der er¬ 
wähnten Stop-Taste, wird ein gerade 
laufendes Programm angehalten und 
am unteren Bildschirmrand eine Me- 
nueleiste eingeblendet. Dort kann der 
Anwender zwischen vier verschiede¬ 
nen Optionen wählen. 

RETURN deaktiviert das Multiface 
und der Rechner fährt fort, das 
unterbrochene Programm abzuar¬ 
beiten. SAVE bringt den Benutzer in 
das Abspeichermenue. Von dort aus 
kann er das gerade im Speicher befind¬ 
liche Programm absaven; entweder 
auf Disk oder mit verschieden schnel¬ 
len Baudraten auf Tape. Wird das 
Programm dann später wieder einge¬ 
laden, setzt es exakt an der Stelle, an 
der es zum Saven unterbrochen 
wurde, ein. TOOL aktiviert die im 
Multiface enthaltenen Hilfsroutinen, 
die in etwa einem spartanischen 
Monitor entsprechen. Beispielsweise 
lassen sich auf diese Art und Weise 



Register lesen oder Adressen mani¬ 
pulieren. 

Einer der speziellen 6128-Befehle, die 
im Multiface enthalten sind, ist SEL, 
mittels dem der Anwender acht 4K- 
Bereiche anwählen kann. Ein weite¬ 
rer 6128-Befehl ist CLEAR, durch 
den sich der zweite 64K RAM des 
6128 löschen läßt. 

Alles in allem ist das „Multiface Two" 
eine sehr hilfreiche Erweiterung, mit 
der beispielsweise das Umkopieren 
von Kassettensoftware auf Disk pro¬ 
blemlos funktioniert. Wer aber nun 
glaubt, hier würde Raubkopierem 
Tür und Tor geöffnet, der irrt - 
Programme, die mit Multiface abge¬ 
speichert wurden, lassen sich nur mit 
Multiface wieder laden. 

Das „Multiface Two” ist eine der 
brauchbarsten Hardware-Erweiterun¬ 
gen, die in letzter Zeit erschienen 
sind. Ich selbst benutze es seit einigen 
Wochen, und bin damit rundum 
zufrieden. 

(HS) 



XARQ 

Hersteller: Electric Dreams 

Vertrieb: Fachhandel 

Monitor: Farbe/Grün 

Steuerung: Joystick/Tastatur 

Programm: 100% M-Code 

Preis: Kass. 39,95/Disk. 59,95 DM(ca.) 

CPC 464 0 CPC 664 0 CPC 6128 0 

Memorandum der Intergalaktischen 
Konföderation. 


Betrifft XARQON: 

XARQON, Wasserwelt in der galakti¬ 
schen Eastside. Erste Katalogisierung 
im Jahre 2350 n.Chr. 

Bodenschätze: Mangan, Titan, Uran. 
Abbau der Bodenschätze seit 70 Jah¬ 
ren durch eine autonome Robotsta¬ 
tion. Bauweise nach dem Zimmer¬ 
mannprinzip. 

Letzter bestätigter Kontakt zur auto¬ 
matisierten Abbaustation vor 60 
Standardtagen. 

Ursache für Kommunikalionsschwie¬ 
rigkeiten: unbekannt. 

Ende der Übertragung. 

Persönliche Mitteilung von General 
Hastings an XARQ Misson Com¬ 
mander: 

Ich befürchte, daß die Anlagen 
XARQ's durch irgendeinen Zwi¬ 
schenfall umprogrammiert wurden. 
Unseren Geheimdiensten ist es 
bisher noch nicht gelungen, einen Ver¬ 
antwortlichen für diese Manipula¬ 
tionen zu finden. Es scheint durchaus 
im Rahmen des Möglichen zu liegen, 
daß keine bewußte Manipulation 
vorliegt. Natürliche Umwelteinflüsse 
der Welt XARQON sind bisher noch 
nicht genügend erforscht, um deren 
Ursächlichkeit am XARQ-Problem 
auszuschließen. Ihre Ausrüstung, um 
das XARQ-Problem zu beseitigen, 
besteht aus einem voll bemannten 
Nik-Nik Hydra-Hochgeschwindig¬ 
keitsboot. 

Ausstattung: Hochleistungslaser. Ra¬ 
ketengeschosse, Minenwerfer, Unter¬ 
wasserbomben. 

Viel Glück, Commander. 

Nur wenig später begibt sich der 
Commander, dem dieses Memo¬ 
randum überstellt wurde, daran, die 
ihm gestellte Aufgabe zu lösen. Dazu 
wird er zusammen mit seinem Schnell¬ 
boot und seiner Crew auf XARQON 
abgesetzt. 

Eine erste Sondierung der Lage er¬ 
gibt, daß aller Wahrscheinlichkeit 
nach, der Zentralreaktor der För¬ 
deranlagegerade dabei ist, sich bis zu 
einer kritischen Masse aufzubauen. 
Die Folgen wären fatal. 

Aber einfach so in die Zimmer¬ 
manngräben, die sich wie ein La¬ 
byrinth rund um den Reaktor er¬ 
strecken, hin und zum Ziel fahren ist 
nicht drin. Alle Abwuhranlagen von 
XARQ sind immer noch voll aktiv 
und reagieren auf alle eindringenden 
Objekte. Das heißt, sobald sich das 
Schnellboot der Anlage nähert, wird 
es von deren Zentralcomputer als 
Feind eingestuft und angegriffen. 
Immer mehr mausert sich Electric 
Dreams zu einem innovativen 
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Softwarehaus. Auch bei XARQ muß 
den Verantwortlichen bei Electric 
Dreams zuerkannt werden, daß sie 
bei der Auswahl ihrer Software mei¬ 
stens eine glückliche Hand haben. 
Im wesentlichen geht es bei XARQ 
darum, die bereits beschriebene An¬ 
lage außer Gefecht zu setzen. Der 
Spieler muß die verschlossenen 
Zugänge zu den inneren, noch 
trocken liegenden Regionen der An¬ 
lage finden, die Schleusen zerstören 
und dann die neu entstandenen Was¬ 
serstraßen nach dem Zentralreaktor 
absuchen. 



Dem Spieler steht eine Kontrollan- 
zeige zur Verfügung, auf deren sieben 
verschiedenen Anzeigen er den je¬ 
weiligen Zustand seines Bootes able¬ 
sen kann. 


Ausgerüstet mit ei¬ 
nem superschnellen 
Kampfschiff alleine 
gegen eine ganze 
Welt. Die Robot¬ 
stadt auf der Wasser¬ 
welt Xarqon ist 
außer Kontrolle. 

Die einzige Mög¬ 
lichkeit, den amok¬ 
laufenden Stadtmo¬ 
loch unter Kontrolle 
zu bringen, ist die 
Vernichtung des 
Zentralreaktors. 
Doch dazu muß der 
Spieler erst einmal 
durch die Zimmer¬ 
mann-Terrassen ge¬ 
langen. 



Natürlich wird er dabei von den 
überall in der Anlage verteilten Ge- 
schülztürmen behindert oder besser, 
beschossen. Aber nicht nur die Kano¬ 
nen greifen das Hydraboot immer 
wieder an - ferngesteuerte Robot¬ 
kampfflugzeuge und ebenfalls unbe¬ 
mannte U-Boote stellen dem Hydra¬ 
boot nach. 

Sollte das Hydraboot schwer beschä¬ 
digt worden sein oder die Munition 
ist ausgegangen, besteht die Möglich¬ 


keit, eine Werft aufzusuchen, in der 
das Boot dann wieder repariert und 
neu ausgerüstet wird. 

Alles in allem hat XARQ mir recht 
gut gefallen, vor allem erzeugt es beim 
Spieler eine verdammt große Moti¬ 
vation, die sich in immer neuem An¬ 
stürmen auf die Inselfestung äußert. 
Einziger Mangel ist in meinen 
Augen, daß das Spiel wie ein leicht 
mutierter Bruder von Ariolasofts 
Panzadrome aussieht, und gewiß 



Computer nnx 


smu fOb 

Bruce Lee 
Crueade in Eurcpe 
F 15 Strike Eaqle 
Hacker IT 
Hellcat ACE 
Soft.wright Che an 
Spitfire ACE 



Sai Corfeat 

C/D 

29.—/45.— 

59.— 

I ntemationa,l Karate 

C/D 

25.—/39.— 

69.— 

Mermaid Madness 

C/D 

39.—/59.— 
29.— /AS .— 

69.— 

59.— 

Mission Omega 

C/D 

35.—/45.— 

59.— 

Pacific 

C/D 

35_ /AS.— 

05.— 

Jchnrry R*4> IX 

C/D 

35.—/39— 

59.— 

Nodes nf Yeecri 

C/D 

39.—/S9.— 


Space Shuttle 

C/O 

3S.—/AS.— 


Knight Rider 


29.— 


Dan Dare 

Xarq 

C/D 

C/O 

39.—/59_ 

39-/59 — 


The Musie Sys teer C/D 49. 

raser Basic C/D 45. 

I^ser Compiler C/D 55. 

P-Y-R-A-D-S-V D 

The Art Stulio (a>C 6120) 

Nevada CDBOTi Cmpiler (CPC+Joyee) 
Nevada FORTRAN cirpiler tCPC-hJoy.) 
Hieoft C-Ccnpiler (CPC + Joyce) 

Pascal MIM- Coipfler (CPC * Joyce) 

CBkSIC Ccnpiler (CPC * Joyce) 

DR Draw (CPC 6128 + Joyce) 

DR Graph (CPC 6128 + Joyce) 

Vtordatar 3.0 (CPC + Joyce) 

dBase II (cpc 6128) 

Multiplan (CPC 6128) 

Prorpt Datcisystem (Joyce) 

Prarpt-Dnjck (Joyce) 


-/69.- 
—/59.« 


D 168.- 
E 168.- 
D 159.« 
D 148.- 
E 140.- 
D 190.« 
D 190.- 
D 189.- 
D 160.- 
D 168.- 
D 69.« 


SPIELE POR CPCi 

3D Chese ( Cyrus II ) 

3D Grand Prix 

Alien 8 

Wintersports 

They sold a Million I 

Hi Rl.se 

Wintergames 

Zoidß 

Macadam Buiper 
Soccer '86 
Ghrsts'n Goblins 
Ttaörunopr 
Pro Tennis 
Jack tbe Nipper 
Shrcun 

Halis OP Gold 

Hunchbaok III the Advent uri 
Bcggit 

Daley Ttarpson's Supertest 
Rescue on Fractalus 
Mission Elevator 
Mcrdragore 
Nexus 

Knight Games 
Gladiator 


C/D 39.— /49.— 


C/D 35. 
C/D 25. 
C/D 39. 
C/D 35. 

C/D 39. 
C/D 35. 
C/D 35. 
C/D 35. 
C/D 35. 
C/D 39. 
C/D 39. 


C/D 35 
C/D 35.- 
C/D 49.- 
C/D 35 •• 
C/D 35.- 
C/D 29.' 


~/49- 
-/»■■ 
—/«».■ 
-/AS.- 
29.- 
-/59- 
~/AS. 
-/SS.. 
—/49." 
-/49.- 
—/49, 
-/59, 


. .BolieitOT - endlich lieferbar. 

...HatMtai 

Nexor 

C/D 

29.—/45 - 

Speed King 


9.90 

Guzzlec 


9.90 

Cerberus 


9.90 

Questor 

C/D 

29.—/45.— 

Activisator 

C/D 

29 - /4S.— 

Atlantic Challarge 


29.— 

The Eidjlon 

C/D 

35.—/5S.— 

Prcdigy 

C/D 

35.— /SS.— 

Cxxrrdafk 1 s Raerae 


29.— 

Nuclear Deferee 

C/D 

29.—/39.— 

Die Erbschaft 

C/D 

49.—/59.— 

StüiJilesH Steel 

C/D 

29.—/45.— 

Street Hawk 


29 - 

Glider Rider 


29.— 

Five a Side Socoer 


ts.— 

Nov Games 3 


29 - 

Werner nach hin 

C/D 

29.—/A9.— 

Split Personalities 

C/D 

29.—/59.— 

Tenpest 

C/D 

3S —/55 — 

Her o of the golden Talisrran 

15.— 

Inpjesible Mission 

C/D 

35.—/45.— 

Lightforce 

C/D 

29.—/39 - 

Tujad 

D 

49.— 

FraGityto 

C/D 

2S.—/39.— 

Druid 


35.— 

Galvan 


25.— 

E&act ivatore 

C/D 

29.—/49.— 

SPIELE FÜR 

J O T C E 

, 


Fairlight 

Tamahavsk 

Afterschock 

Batjran 

SAS Raid 

Space Invadera 

3 D Clock Chess 

Colossus Checs Volume TV 

Cyrus Chens 


Postfach 1461 * 7920 Heidenheim * Tel.: (07321) 46664 
Bankverfc.: Dresdner Bank Heidenheim (BLZ 61480001), Kto.: 570142900 
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auch von denselben Leuten gemacht 
wurde. Aber wer Panzadrome noch 
nicht hat, sollte sich statt dessen lie¬ 
ber XARQ zulegen, und wer Pan¬ 
zadrome schon hat, aber der Mei¬ 
nung ist es sei zu schwer, sollte sich 
XARQ auch zulegen, denn hier wird 
er um einiges besser bedient. 

(HS) 


Werner „Mach hin" 

Hersteller: Ariolasoft 

Vertrieb: Fachhandel 

Monitor: Farbe/Grün 

Steuerung: Joystick/Tastatur 

Preis: Kass. 29,95/Disc 39,95 DM(ea.) 

CPC 464 El CPC 664 El CPC 6128 & 

Eine der bekanntesten Personen des 
öffentlichen deutschen Lebens ist, 
nach Otto, Helmuth Kohl und Bruno 
Baumgeig (den kennen Sie auch 
nicht gelle), der landauf, landab be¬ 
liebte Werner. 

Werner, der Kieler „Flaschbieä 
König”, der Schrecken aller TÜV-Be- 
amten nördlich Münchens, hat end¬ 
lich den Sprung in das neue Medium 
Computerspiel geschafft. 

Eigentlich wollte sich Werner gar 
nicht zu einem Computerspiel herge¬ 
ben, doch Willi Kamincke von Ario¬ 
lasoft ist es zu verdanken, daß das 
Spiel dann doch zustande gekommen 
ist. Er erklärte Werner einfach, daß es 
bei dem Projekt um die Erforschung 
der Prozessor-Reaktion unter Bier¬ 
einfluß ginge. Werner - immer inter¬ 
essiert an derartigen Biergrundla¬ 
genforschungen - willigte spontan 
ein und erschien mit seinem Team, 
bestehend aus Holgi, Jeckel und dem 


grauenerregenden Zündschlüsselab¬ 
zieher. 

Innerhalb kürzester Zeit gelang es 
den dreien, in den Räumlichkeiten 
des Micro-Partner Teams, das für die 
Programmierung des Spiels ver¬ 
antwortlich ist, eine ganze Menge 
Unruhe zu stiften. Trotz allem ist es 
den Micro-Partner Jungs gelungen, 
inmitten des Chaos ein anständiges 
Programm zu erstellen. 

Daß sich Deutschland seit fast vier 
Jahren in einem regelrechten „Wer¬ 
ner-Fieber” befindet, sollte inzwi¬ 
schen jedem klar sein, der sich ab und 
an einmal mit Comics beschäftigt. 
Die herrlich blöden und chaotischen 
Storys um den Kieler Tunichtgut lie¬ 
gen inzwischen in fünf verschiede¬ 
nen Büchern vor. Kein Wunder also, 
daß sich deutsche Software-Produ¬ 
zenten gesagt haben: „Was den Eng¬ 
ländern recht ist, ist uns nur billig.” 
Und - schwuppdiwup - ein Spiel zum 
Comic gemacht haben. 

Das Spiel selbst setzt sich aus mehre¬ 
ren Episoden zusammen, die alle¬ 
samt auf Werners Lieblingstätigkeiten 
beruhen. Im ersten Teil des Spieles 
will Werner auf eine Fete fahren, und 
hat sich sein Auto mit den dazu benö¬ 
tigten Utensilien beladen: Bier. 
Allerdings tauchen auf der Fahrt 
immer neue Hindernisse auf, die 
Werner unter Zuhilfenahme der Ge¬ 
genstände, die an der Straße liegen, 
beseitigen muß. Taucht beispielsweise 
eine Wand mitten auf der Straße auf, 
ist es gut, eine Bombe im Kofferraum 
zu haben. 

Nächste Disziplin: Fahr mit Werner 
in den Urlaub. Aber Werner kann 
sich nie entscheiden, was er im einzel¬ 
nen mitnehmen soll, und zu allem 


SPiEUDEE BEDlENUNGS- OOKUMEHTAIlO» GRAFIK SOUND PRElS/lElSIUNG 
FREUNoJftlKtn 



Überfluß ist im Auto auch nur Platz 
für vier Gegenstände. Hier haben Sie 
dafür zu sorgen, daß Werner das 
Richtige mit in den Urlaub nimmt. 
Packt er sich nämlich die falschen Sa¬ 
chen ein, kommt er erst gar nicht am 
Zielort an. 

Dritte Disziplin: Basteln Sie sich 
unter Werners Expertenaugen eine 
Schraddel - äh - Motorrad zusam¬ 
men. Aus einem umfangreichen 
Teilesortiment muß eine echt geile 
Maschine zusammengebaut werden. 
Ist die Maschine erst einmal fertig, 
stehen Sie nun vor dem Problem, das 
Produkt Ihrer Bemühungen an den 
Mann zu bringen - es ganz einfach zu 
verkaufen. 

Ganz einfach?! He, He - erst einmal 
müssen Sie den richtigen Käufer 
finden. 

In der vierten und letzten Abteilung, 
die bedauerlicherweise allerdings 
nicht in der Kassetten-Version enthal¬ 
ten ist, geht es um eine Schußfahrt 
durch einen echten deutschen Hoch¬ 
qualitätsnebel. Diese Tour entwickelt 
sich selbstredend zu einem Alptraum 
- allerdings zu einem lustigen. 
Nachdem vor nicht allzulanger Zeit 
das Spiel Mission Elevator als rein 
deutsche Produktion auf den Markt 
kam, und bewies, daß auch hierzu¬ 
lande gute Spiele produziert werden 
können, schlägt Werner genau in die¬ 
selbe Kerbe, und das hoffentlich mit 
ebensoviel Erfolg. 

Die Grafik des Spiels ist - sicherlich 
nicht zuletzt durch die persönliche 
Mitarbeit von Meister Brösel - ausge¬ 
zeichnet. Die Figuren sind allesamt 
detailliert programmiert und gut ani¬ 
miert worden. Der Sound braucht 
sich auch nicht zu verstecken. Die 
Gags und Witze, die sich durch das 
ganze Spiel ziehen, machen es noch 
um einiges attraktiver, als das 
ohnehin schon der Fall ist. 

Wenn deutsche Programmierer in 
dieser Form weitermachen und auch 
in Zukunft derart gute Programme er¬ 
stellen, wird sich sicherlich in ab¬ 
sehbarer Zeit einiges auf dem 
deutschen Softwaremarkt verändern. 
Na, wollen wir's hoffen! 

(HS) 


Wer kennt ihn nicht, 
den König der Kie¬ 
ler Bierprinzen. 
Endlich erlebt er 
sein Debüt als Com¬ 
puterspiel. Brösel, 
Werners Papi 
höchstselbst, war für 
die Grafik dieses 
Spiels verantwort¬ 
lich. Ein echt gelun¬ 
genes Stück germa¬ 
nischer Software. 

Da kann man nur 
noch sagen: Werner 
meiert für Deutsch¬ 
land. 
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ZX Spectrum 48 K/128K Cassette 
Schneider CPC Cassette + Diskette 
Commodore 64/128 Cassette + Diskette 






Als Roboter Kindermädchen zu spielen, 
wäre eine schöne Abwechslung. 

Aber wenn das Kind noch im Krabbelalter ist, 
entführt wird und auch noch aus den Fängen 
einer brutalen Macht gerettet werden muß, macht 
es keinen Spaß mehr. 

Wachen bekämpfen und Baby be¬ 
wachen. In Deckung gehen und Kind 
füttern. Feuer legen und Windeln wechseln. 
Und immer hübsch langsam gehen, damit 
Junior auch hinterherkommt. Und ständig 
diese Ballerei! 

«,me Kiei* HOKS,T! 

Wenn ich nicht bald ein paar Flaschen 
OXY und GEN zu mir nehme, geht mir 
die Puste aus. 
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Rockford ist wieder 
da. 12 neue kniffe¬ 
lige Höhlen und La¬ 
byrinthe warten dar¬ 
auf, erkundet zu wer¬ 
den. Wie schon bei 
den ersten beiden 
Teilen, findet der 
Spieler hier gute 
Grafik und ein noch 
besseres Spiel, das 
sicherlich lange zu 
fesseln vermag. 







Boulder Dash III 

Hersteller: First Star/Action 
Vertrieb: Fachhandel 
Monitor: Farbe/Grün 
Steuerung: Joystick/Tastatur 
Preis: 37- DM(ca.) 

CPC 464 H CPC 664 S CPC 6128 ES 

Rockford is back. Nachdem das 
kleine undefinierbare Männchen be¬ 
reits zweimal Protagonist eines Boul¬ 
der Dash Spieles war, kommt hier 
nun der dritte Teil. Wie bereits bei den 
ersten beiden Teilen, geht es auch 
hier um das Einsammeln von Dia¬ 
manten. Diese allerdings liegen nicht 
einfach so in der Gegend herum, viel¬ 
mehr muß sich Rockford erst einmal 
einen Weg zu ihnen bahnen. 

Die abenteuerliche Schatzsuche 
Rockfords findet in einem ausge¬ 
dehnten unterirdischen Höhlensy- 
stem statt. Bedauerlicherweise hat es 
in diesen Höhlen einige Erdrutsche 
gegeben und die Diamanten liegen in 
einem unüberschaubaren Chaos aus 
Felsen und Erde. 

Buddelt sich Rockford nun zu einem 
der heißbegehrten Kleinodien vor. 


muß er immer das ihn umgebende 
Erdreich im Auge behalten, ein klei¬ 
ner Ruck genügt um Tonnen von Fel¬ 
sen auf ihn herniederfallen zu lassen, 
und was das bedeutet, können Sie sich 
sicherlich selbst zusammenreimen. 
Wie auch schon bei den ersten beiden 
Teilen dieses Spiels, hält man sich 
auch hier an das bewährte und be¬ 
liebte Spielprinzip. Jede der zwölf 
unterschiedlichen Höhlen wird 
durch ein mehrere Bildschirme 


großes Spielfeld symbolisiert. Je nach 
dem, wie der Spieler nun seinen 
Rockford steuert, scrollt der Screen 
Rockford hinterher. Die einzelnen 
Level werden als Querschnitt darge¬ 
stellt, Rockford kann in vier verschie¬ 
dene Richtungen gesteuert werden: 
links, rechts, oben und unten. 
Während seiner Buddelei ist die 
wichtigste Richtung, auf die Rock¬ 
ford achten muß, oben. Von dort 
kommen nämlich die Steine herabge- 


P. 



Preisrätsel 

Weil Weihnachten ist. und Sie , lieber Leser, sich sicherlich gerade Gedanken darum 
machen, wie Sie all die grauen Haare, die Ihnen angesichts der Preise Ihrer Geschen¬ 
ke gewachsen sind, wieder wegbekommen, soll es hier einmal etwas umsonst geben. 



Tja, aber nicht für jeden und auch nicht ganz umsonst. Ein bißchen was müssen Sie auch hier tun, und ein wenig Glück gehört auch noch dazu, denn nicht 
umsonst gehören Preisausschreiben in die Kategorie »Glücksspiele«. Nun, worum geht es? Mastertronic’s neue MAD-Games Reihe zeigt seit einiger Zeit, wie¬ 
viel Spiel der User mancherorts für sein Geld bekommt. Die Spiele, die bisher in dieser Reihe erschienen sind, haben das Zeug zu echten Computerspiel- 
Evergreens, und das zu Preisen, die manchem anderen Anbieter den Angstschweiß auf die Stirne treiben. Einer der erfolgreichsten Helden von Mastertronic er¬ 
lebte seine Abenteuer bereits in drei verschiedenen Mastertronic Arcaden Adventures, von denen zwei im Rahmen der MAD-Games erschienen sind. Um sich 
nun ein anständiges Stück aus dem Mastertronic-Gewinnkuchen herauszuschneiden - immerhin gibt es 250 Programme zu gewinnen — müßten Sie nur eine 
Postkarte an uns schicken und darauf Ihren Namen, Ihre Adresse und als Kennwort deutlich lesbar »MASTERTRONIC« schreiben Wenn Sie nun auf die Rück¬ 
seite der Postkarte auch noch die Antworten auf die folgenden drei Fragen vermerken, nehmen Sie auf jeden Fall an der Verlosung teil. 


1. Auf welchen Namen hört der Held der drei im Text angesprochenen Mastertronic Programme? 

2. Auf wessen Konto geht die Programmierung des Sounds? 

3. Und, last but not least, wer hat den Helden aus Frage 1 und auch die Spiele darumherum erdacht? 

Nun, leicht sind die Fragen nicht gerade, aber schwer kann man sie auch nicht nennen. Wenn Sie ein bißchen überlegen oder einfach mal nachsehen, sollten 
Sie recht bald des Rätsels Tücke durchschaut haben. Wie gesagt, gibt es 250 Mastertronic-Programme zu gewinnen, und weil ein Spiel als Gewinn ein wenig 
dünne ist, haben wir den Preiskuchen in 50 leckere Teile ä 5 Kassetten zerlegt, die wir unter Ausschluß des Rechtsweges unter den richtigen Einsendungen 
verlosen. Also, Sie wissen was zu tun ist Gab es sonst noch etwas? Ach ja, der Einsendeschluß, tja, bis zum 14.12.1966 sollte Ihre Karte schon in der Post 
sein. Damit es keine Mißverständnisse gibt, einigen wir uns auf das Datum des Poststempels. 

Einsendeschluß: 14.12.1986 

Wer seine Postkarte bis dahin nicht eingeworfen hat, guckt in die Röhre. So, Fragen: haben wir, Preise: sind bekannt, Einsendeschluß: darauf wurde hingewie¬ 
sen, Rechtsweg: ist ausgeschlossen. Daß Sie auch richtig raten müssen, versteht sich von selbst. 

So, jetzt verrate ich Ihnen noch, wohin Sie Ihre Postkarte adressieren sollten: 

PC Schneider International * 3440 Eschwege * Postfach 250 
Kennwort: MASTERTRONIC 


Bleibt nur noch, Ihnen im Namen von Mastertronic und der PC Schneider Internati'orial-Redaktion viel Glück zu wünschen. 
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Vieles kann 
man einpacken... 
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stürzt, wenn Rockford das darunter¬ 
liegende Erdreich weggräbt. Aber 
nicht nur vor fallenden Felsen muß 
sich Rocky vorsehen, in einigen der 
Level gibt es auch noch einige Urwe- 
sen, die von den Gesteinsmassen ein¬ 
geschlossen wurden. Gräbt Rockford 
seine Gänge so unglücklich, daß er 
diese gefangenen Wesen befreit, muß 
er sich außerdem noch vor ihnen in 
Sicherheit bringen. 

Einige der Level beinhalten auch ein 
ausgeprägtes Puzzlemoment, bei¬ 
spielsweise gibt es Höhlen, in denen 
es gar keine Diamanten gibt. Aber um 
in das nächste Level zu gelangen be¬ 
nötigt Rocky einige der wertvollen 
Klunker. Also, woher nehmen und 
nicht stehlen? Je nachdem, in wel¬ 
chem Level sich Rocky befindet, gibt 
es verschiedene Möglichkeiten, die 
Diamanten zu erzeugen. Entweder, 
falls es einige der Urtiere in diesem 
Bild gibt, lassen Sie diesen einen 
Stein auf den Kopf fallen, woraufhin 
sie sich in Juwelen verwandeln. Wie¬ 
der in anderen Leveln gibt es seltsame 
Amöben und magische Wände, die 
allesamt dazu dienen, Diamanten 
zu erzeugen. 


SPIEUDCE BEOlENUNGS- DOKUMENTATION GRAFIK SOUND PREI$AEI$TUNG 
FREUNDLICHKEIT 
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Im Vergleich zu seinen beiden Vor¬ 
gängern hat sich in puncto Grafik 
einiges geändert; so sind einige der 
Spielkomponenten mit einem raffi¬ 
nierten Metall-Design versehen wor¬ 
den. Ansonsten ist „Boulder Dash 
III” mindestens ebenso gut und spiel¬ 
bar wie seine beiden Vorgänger. 

(HS) 

Knight Rider 

Hersteller: Ocean 
Vertrieb: Fachhandel 
Monitor: Farbe/Grün 
Steuerung: Joystick/Tastatur 
Programm: 100% M-Code 
Preis: ca. 30,- DM 

CPC 464 0 CPC 664 S CPC 6128 S 

Computerspiele nach Kinofilmen 
und Fernsehserien sind derzeit groß 
in Mode. „Knight Rider” fällt uneinge- 


Dieses Computer¬ 
spiel ist mindestens 
ebenso schlecht wie 
die namengebende 
Fernsehserie. 

Lasche Grafik, töd¬ 
liche Langeweile als 
Spielgeschehen und 
flauer Sound. 

Ocean, Ocean - was 
ist nur los, Knight 
Rider hat auf jeden 
Fall Chancen der 
Flop des Jahres zu 
werden. 



schränkt unter diese Kategorie von 
Spielprogrammen. 

Wie in der Serie, die uns hier in 
Deutschland bisher erspart geblie¬ 
ben ist, geht es um Verbrechensbe¬ 
kämpfung. Genauer gesagt, müssen 
sich Michael Knight und sein Super- 
Computerauto mit einem interna¬ 
tionalen Terroristenring auseinan¬ 
dersetzen und wenn möglich, deren 
geplante Anschläge vereiteln. 

Das Computerauto ist ein Kapitel für 
sich. Es ist mit einem derart leistungs¬ 
fähigen Rechner ausgerüstet, daß es 
sogar so etwas wie eine künstliche 
Intelligenz hat, und auf den Namen 
K.I.T.T. hört. 

K.I.T.T. ist via Minisender immer mit 
Michael und dem Hauptquartier ver¬ 
bunden. 

Im wesentlichen geht es bei dem 
Spiel, wie bereits erwähnt, um das Ver¬ 
eiteln der Terroranschläge. Im SpieT 
ablauf sieht das folgendermaßen aus: 
KJ.T.T.'s Basis befindet sich in der 
Stadt Atlanta, von dort aus müssen 
die beiden quer durch den amerika¬ 
nischen Kontinent rasen. Auf dem 
Monitor erscheint eine Karte der Ver¬ 
einigten Staaten, auf der der Spieler 
mittels eines Cursors sein nächstes 
Ziel anwählen kann. Durch den 
Feuerknopf beginnt der Spieler dann 
die Fahrt zum angewählten Ziel. Die 
Karte der USA blendet sich aus und 
weicht einer 3D-Darstellung der 
Straße, über die K.I.T.T. zum ange¬ 
wählten Ziel gelangt. 

Da die Terroristen nicht schlafen, 
sind sie auch über Michael Knights 
Mission informiert, und versuchen, 
ihn und K.I.T.T. daran zu hindern, 
ans Ziel ihrer Reise zu gelangen. Dies 
versuchen sie mittels ganzer Armeen 
von raketenbewehrten Hubschrau¬ 
bern. Allerdings ist KI.T.T. mit einem 
Lasergeschütz ausgerüstet und somit 


recht gut in der Lage, sich seiner Haut 
zu erwehren. 

Dem Spieler stehen auf dieser Fahrt 
zwei verschiedene Steuerungsmög¬ 
lichkeiten zur Auswahl: Einmal kann 
er sich mit der Steuerung von K.I.T.T. 
beschäftigen und ihm die Abwehr der 
feindlichen Hubis überlassen oder 
aber selber schießen und K.I.T.T. 
fahren lassen. Trotz der zwei verschie¬ 
denen Steuermodes ist diese Sequenz 
des Spieles extrem langweilig und alles 
zusammen genommen ganz schön 
schlecht. 

Ein wenig besser wird es erst, wenn 
Michael und sein Auto an das Ziel 
ihrer Reise gelangt sind. Dort muß 
sich Michael in diverse Gebäude ein¬ 
schleichen und die unterschiedlich¬ 
sten Aufgaben erledigen. 

Zwar ist es wirklich so, daß Michael 
und K.I.T.T. in jeder Stadt etwas an¬ 
deres zu tun haben, doch letztendlich 
sieht die eine Mission auf dem 
Monitor genau so aus wie die 
andere. 

Das Gebäude, das es zu untersuchen 
oder zu durchqueren gilt, wird in 
einer Draufsicht dargestellt. In den 
einzelnen Räumen laufen Wachen 
herum, die sich aber relativ leicht 
übertölpeln lassen, sie können sich 
nicht von ihrer festgelegten Route 
entfernen. Die einzige echte Schwie¬ 
rigkeit bei diesem Teil des Spieles ist 
das Auftauchen eines Profikillers, der 
sich frei im Raum bewegt und 
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.wenn 

JOYCE auspackt. 

Auspacken, auf stellen, anfangen: 

JOYCE - das zeitgemäße 
Bildschirm-Schreibsystem 


Das komplette System - 
Computer, Monitor, Drucker 
und Software - 
für alle Schreibtische 
und jedes Budget. 



Schneider 

weil Leistung überzeugt 


DM 1.799,- 

unverbindliche Preisempfehlung 
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Schlüpfen Sie in die 
Rolle des schlimm¬ 
sten Lausbuben der 
Stadt. Denken Sie 
sich die übelsten 
Scherze aus und 
verwirklichen Sie 
sie. Aber lassen Sie 
sich nicht von den 
Opfern Ihrer Witze 
erwischen. Die ver¬ 
sorgen Sie als Ge¬ 
genleistung mit 
reichlich Prügel. 



Ai. 

-&l -fP 4%, 


ftASN 


PflUSED 


URUGHTYOHETER 


Wtt-ffj 

1 2 


Michael, sobald er ihn einmal gese¬ 
hen hat, permanent verfolgt. 

„Knight Rider" ist eines der am wenig¬ 
sten überzeugenden Spiele, die in 
letzter Zeit auf meinem Tisch gelan¬ 
det sind. Sowohl Spielidee als auch 
die Ausführung sind schlicht und 
ergreifend schlecht. Die Grafik ist 
mau und der Sound mittelprächtig. 
Wäre „Knight Rider" ein Budget-Spiel, 
könnte man noch „OK" dazu sagen - 
aber 30,- DM sind für dieses Spiel 
ganz einfach viel zu viel. 

(HS) 

Jack the Nipper 

Hersteller: Gremlin Graphics 
Vertrieb: Fachhandel 
Monitor: Farbe/Grün 
Steuerung: Joystick/Tastatur 
Preis: Kass. 27,-/Disk. 39 - DM(ca.) 

CPC 464 S CPC 664 0 CPC 6128 0 

Im Grunde genommen ist Jack ein 
netter kleiner Junge, wie tausend an¬ 
dere auch. Doch was nur die wenig¬ 
sten wissen: Jack hat eine Doppel¬ 
identität, und als „Jack the Nipper" ist 
er der Schrecken der ganzen Stadt. 
Obwohl es durch den Namen sicher¬ 
lich leicht zu Verwechslungen kom¬ 
men kann, tut sich Jack zumeist weni¬ 
ger durch blutrünstige Untaten 
hervor, denn durch wüste Streiche. 
Kaum hat er des Morgens seiner Mut¬ 
ter auf Wiedersehen gesagt und ihr 
bei der Gelegenheit auch verspro¬ 
chen. nichts anzustellen, läuft er 
durch die Straßen der Stadt und über¬ 
legt, wem er nun als nächstes einen 
Streich spielen könnte. Und Jack hat 
Phantasie - immer neue Streiche 
heckt er aus, einer schlimmer als 
der andere. 

Einmal legt er im Computershop den 
Betrieb lahm, indem er die Sicherung 
herausdreht, ein anderes Mal ver¬ 
klebt er die Gebisse einer Dental¬ 
fabrik mit Kaugummi. Ständiges 
Utensil, mit dem er einiges an Unsinn 
anstellen kann, ist Jacks Blasrohr. 
Tja, und so zieht der kleine 
Tunichtgut durch die Stadt, und je¬ 
der, der ihn sieht, sagt: „Sieh mal, da 
läuft „Jack the Nipper”. 

Doch alles ist auch bei Jack nicht 
immer eitel Sonnenschein. So muß er 
immer Zusehen, wie er nach einem ge¬ 
lungenen Streich am besten Land ge¬ 
winnt. Denn gelingt das nicht, kann 
sich Jack auf eine anständige Tracht 
Prügel gefaßt machen. 

Nicht nur das Wortspiel im Titel die¬ 


ses Spiels machte mich auf den ersten 
Blick auf dieses Spiel aufmerksam, 
auch die Gestaltung des Covers 
weicht hier um einiges vom ge¬ 
meinhin Branchenüblichen ab. Als 
ich das Spiel dann auspackte, fiel mir 
als erstes ein Ansteck-Button in die 
Hände, auf dessen Vorderseite mir 
Jack höchstselbst entgegensah. "Los, 
kauf dieses Spiel - sonst...", droht das 
Konterfei jedem, der es sich anschaut, 
vom Button runter. 

Durch die unübliche Aufmachung 
war ich natürlich sehr gespannt auf 
das eigentliche Spiel: würde es halten 
können, was das Außenrum ver¬ 
spricht? 

Schlichte und ergreifende Antwort: Es 
kann. 

Sowohl die Grafik ais auch der Sound 
von „Jack the Nipper" gehören mit zu 
dem Besten, was seit langem auf mei¬ 
nem alten Arnold zu sehen war. Im 
wesentlichen aufgebaut wie ein einfa¬ 
ches Arcaden-Abenteuer, besteht die 
Aufgabe des Spielers darin, Jack 
durch die Stadt zu lenken, diverse Ge¬ 
genstände einzusammeln und dann 
damit den größtmöglichen Unsinn 
anzustellen. 


S*EU0EE BEDIENUNG DOKUMENTATION GRAFIK SOUND FflEIS/LElSTUNG 
FREUKDÜCHKEIT 
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Am unteren Ende des Monitors ist 
eine Anzeige, an der man ablesen 
kann, wieviele Leben noch verblei¬ 
ben. Ist eines davon verloren, ver¬ 
schwindet das Männchen nicht etwa 
einfach - nein - es hält sich das offen¬ 


sichtlich malträtierte Hinterteil und 
verzieht das Gesicht. 

Mit ,Jack the Nipper”, man beachte 
die Ähnlichkeit mit Jack the Ripper, 
hat Gremlin Graphics wieder einmal 
voll ins Schwarze getroffen: tolle 
Grafik, super Sound und zur Ab¬ 
wechslung einmal etwas ganz Neues 
in puncto Spielhintergrund. Was will 
man von einem guten Spiel mehr 
verlangen. 

Was? - Ach ja, wie konnte ich es nur 
vergessen - die Spielmotivation. Also 
von der brauchen wir eigentlich gar 
nicht zu sprechen, denn die stellt sich 
ganz von alleine ein. 

(HS) 

The Eidolon 

Hersteller: Activision/ 

Lucasfilm Games 
Vertrieb: Fachhandel 
Monitor: Farbe/Grün 
Steuerung: Joystick/Tastatur 
Preis: Kass. 39,-/Disc. 59,- 

CPC 464 Bl CPC 664 0 CPC 6128 0 

Am 21. April 1850 gelang dem Wissen¬ 
schaftler Josef Vincent Agon eine 
epochale Entdeckung. An diesem 
Tage stellte er das Eidolon fertig - 
eine Maschine, die nicht mit herkömm¬ 
lichen Energien betrieben wird, 
und auch nicht den uns bekannten 
Naturgesetzen unterliegt. Welche 
Energien das Eidolon nun assimi¬ 
liert ist selbst Dr. Agon noch ein 
Rätsel, doch daß es ihm mit der von 
ihm entworfenen Maschine möglich 
ist, Reisen in eine völlig fremde und 
unwirkliche Welt zu machen, erfährt 
er wenig später, als er das erste Mal 
das Eidolon benutzt. 
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Vorsicht vor Grauimporten! 

Bitte prüfen Sie schon beim Kauf, ob die¬ 
ses Programm wirklich eine deutsche An¬ 
leitung enthält Spätere Reklamationen 
können leider nicht berücksichtigt werden. 


Imagine Software, An der Gümpgesbrücke 24, 4044 Kaarst 2 
Vertrieb: Rushware Mitvertrieb: fftiliClO-HlSftBISü Distribution in Österreich: Karasoft 

Rushware-Produkte erhallen Sie in den Fachatrteilungen von Q und L?PT|i3 sowie in allen gutsortierten Computershops und im guten Versandhandel 




Commodore 64/128 
Schneider CPC 
Spectrum 48 K 
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Unheimliche Kräfte werfen ihn mit¬ 
samt seiner Maschine in eine fremde 
Dimension oder Welt. Um was es sich 
wirklich handelt, bleibt ihm verbor¬ 
gen, auf jeden Fall findet er sich, 
zusammen mit seiner Maschine, in 
einem unheimlichen Tunnelsystem 
wieder, in dem die skurrielsten und 
grauenerregendsten Wesen leben, die 
er jemals zu Gesicht bekommen 
hat. 

Erstaunt und erschreckt fährt Dr. 
Agon mit seinem Eidolon durch die 
unterirdische Wunderwelt, die sich 
vor seinen Augen ausbreitet. Immer 
neuen und sonderbareren Wesen be¬ 
gegnet er auf seinen Exkursionen. Er¬ 
staunt registriert er, daß es Energie in 
dieser Dimension offensichtlich in 
gebündelter Form gibt, denn überall 
in den Gängen findet Dr. Agon leuch¬ 
tende Energiebälle, die frei in der Luft 
schweben. Bald schon merkt Dr. 
Agon, daß seine Maschine in der 
Lage ist, diese Energiekugeln aufzu¬ 
nehmen und in die eigenen Batterien 
einzuspeichern. Immer tiefer dringt 
Agon in das unterirdische Monster¬ 
reich ein, bis ihm hinter einer Gang¬ 
biegung ein Wesen gegenüber steht, 
das seinen schlimmsten Alpträumen 
entsprungen sein könnte. Ein riesiger 
Drache bewacht, umhüllt von einem 
Energiefeld, den Zugang zu weiteren 
Tunnels und Korridoren. Noch 
schläft der Drache, aber würde er er¬ 



wachen, wenn Dr. Agon sich weiter 
nähert? 

Nach langen Wochen des Wartens, so 
könnte man das auch in diesem Fall 
umschreiben, ist das schon seit 
Monaten angekündigte Spiel der 
Lucasfilm Games Programmierer 
endlich fertig. Bereits die Vorankün¬ 
digungen, in denen es hieß, daß die 
Umsetzung der fractalen Grafiken 
noch besser gelungen sei als auf dem 
C 64, machten mir den Mund so 
richtig wässerig. Als ich das Spiel 
dann endlich in den Händen hielt. 


Einsteigen, Türen 
schließen. Vorsicht 
beim Dimensions¬ 
transport. 

ln einem alten Haus 
befindet sich das 
Eidolon, eine Ma¬ 
schine, wie Sie sie in 
Ihren wildesten 
Träumen noch nicht 
gesehen haben. Eine 
Maschine, die Ihnen 
den Zugang zu einer 
unheimlichen, phan¬ 
tastischen Höhlen¬ 
welt ermöglicht. Ein 
neuer Hit aus dem 
Hause Lucas Films. 



konnte ich es natürlich kaum erwar¬ 
ten, zu sehen, was nun wirklich an 
den Vorschußlorbeeren dran war. 
Erstaunlicherweise stimmte so ziem¬ 
lich alles, was diesem Spiel nachge¬ 
sagt wurde. Der Spieler, also schon 
wieder Sie, hat die Aufgabe, in Dr. 
Agons Maschine Platz zu nehmen 
und das Eidolon durch die in einer 
fantastischen 3D-Grafik dargestell¬ 
ten Höhlengänge zu steuern. Wie wei¬ 
ter oben bereits beschrieben, begeg¬ 
net der Spieler (schon wieder Sie) 
immer neuen Kreaturen, die es zu ver¬ 
nichten gilt. Nicht ohne Grund, denn 
jedes dieser Wesen bewacht einen 



kleinen Schatz, den der Spieler 
braucht, um in den nächsten Level zu 
gelangen. Diese Schätze sehen im 
Grunde genommen nicht anders aus 
als die schwebenden Energiekugeln, 
denen der Spieler allenthalben in den 
Stollen begegnet. Nur haben sie eine, 
andere Farbe. Nimmt das Eidolon 
eine dieser farbigen Kugeln auf, so 
wird sie nicht in den Energiespeicher 
der Maschine aufgenommen, son¬ 
dern als Waffe benutzt. Sind erst ein¬ 
mal alle kleineren Monster erlegt, 
und alle deren Energiekugeln einge¬ 
sammelt, kann der Spieler sich dar¬ 


anmachen, und dem großen Drachen 
entgegentreten. 

In der richtigen Reihenfolge benutzt, 
kann man sich damit den Zugang 
zum nächst-höheren Level freischie¬ 
ßen. Doch am Ende dieses Labyrin¬ 
thes wartet schon ein anderer Drache 
auf Sie. Mächtiger und gefährlicher 
als alles andere, dem sie bisher in den 
Höhlen begegnet sind. 

Wiedereinmal ist mit diesem Spiel 
bewiesen worden, was sich von talen¬ 
tierten Programmierern aus dem 
guten alten Arnold herauskitzeln 
läßt. 

Die Fahrten durch die Labyrinthe 
sind so fantastisch und flimmerfrei 
animiert, wie es in dieser Form auf 
dem Schneider noch nicht zu sehen 
war. Die Story wurde so geschickt in 
das eigentliche Spiel integriert, daß 
mitunter der Eindruck entsteht, man 
hätte ein von Jules Verne oder H.G. 
Wells erdachtes Spiel vor sich. Die 
Musik des Programmes unterstreicht 
diesen Eindruck noch zusätzlich. 

„The Eidolon bekommt von mir die 
bestmögliche Wertung, da es meines 
Erachtens in allen Punkten das Beste 
aus einem gelungenen Spielkonzept 
macht. Der spieleinteressierte Schnei¬ 
der-User darf sich sicherlich auf jede 
Lucasfilm Games-Neuigkeit freuen. 
Und seien Sie versichert, ich freue 
mich mit ihm. 

(HS) 
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Hyroglyphos 

total 


Mit diesem Programm steht dem 
Joyce-Besitzer jeder erdenkliche Zei¬ 
chensatz zur Verfügung, ob Russisch, 
Chinesisch, Dänisch oder Japanisch. 
Jeder Buchstabe kann im Format 
30x16 Pixel gedruckt werden. 

Für einen Zeichensatz von 95 alpha¬ 
numerischen Zeichen stehen die 
ASCII-Codes von 33 - 128 zur Verfü¬ 
gung. Auszudruckende Texte (nur 
ASCII-Format) können mittels RPED 
oder LocoScript erstellt werden. Die 
maximale Zeilenlänge sollte 70 Zei¬ 
chen betragen; jedoch führt „Hy¬ 
roglyphos" auch selbständig einen 
Zeilenumbruch durch. Am Ende einer 
Textdatei muß das Zeichen ALT T 
eingegeben werden. 


Die Menuepunkte 

Buchstaben laden: 

Eine vordefmierte Buchstabendatei 
wird von Disk geladen (Datei PICA. 
BAS ist auf der Joyce-Databox vor¬ 
handen). Dieser Vorgang dauert ca. 
70 sec. 

Buchstaben speichern: 

Die definierten bzw. geänderten Zei¬ 
chen werden auf Diskette gespei¬ 
chert; Dauer ca. 80 sec. 

Buchstaben erstellen: 

Der Cursor blinkt im kleinen 
Window; die Eingabe des zu erstel¬ 
lenden Zeichens wird erwartet. An¬ 
schließend wird der Buchstabe im 
großen Window mittels Cursor, Plus- 
und Minustaste definiert. RETURN 
beendet den Zeichenvorgang; durch 
EXIT wird das aktuelle Zeichen ge¬ 
löscht und man befindet sich wieder 
im Hauptmenue. 

Buchstabe umändern: 

Schon existierende Zeichen können 
umgeändert werden. Der gewünschte 


Buchstabe wird im kleinen Window 
eingegeben; das aktuelle Aussehen 
wird im großen Window angezeigt. 
Nun wird im kleinen Window noch 
der neue Name des Zeichens eingege¬ 
ben, anschließend kann das Zeichen 
wie unter erstellen’ editiert werden. 

Buchstabe löschen: 

Diese Funktion ist selbsterklärend. 

Text drucken: 

Neben der Eingabe des Dateinamens 
der auszudruckenden (ASCII-)Datei 
ist auch die Eingabe des Abstands 
zwischen zwei Zeichen und der Zei¬ 
chenbreite einstellbar. 

Inhaltsverzeichnis: 

Bringt das Directory der aktuellen 
Diskette auf den Bildschirm. 

Anmerkung: Durch Neustart des 
Programmes mit RUN’ wird eine ge¬ 
ladene Buchstabendatei nicht ge¬ 
löscht! 

(P. Sprus) 


io * ********************************************** 

20 '** Tobias Mlynski & Peter Sprus Produktion *** 
30 * ********************************************** 

40 CLBAR, 50500! :DIK u(32,16):DIM a(65):DIM d<16> 

50 FOR X = 51000! TO 51112!:PQKE x,0;NEXT 

60 POKE 50902! ,10:POKE 50880!,0:POKE 50883!,0: * Spa 

ce auf 10 Pixel 

70 '*********** COMPUTERCOMXANDOS **************** 

80 esc$ = CHR»(27):clr* = escS+"E"+esc$+"H":cup* = 
esc$+"A":getc* = eac$+"J":prtc® = esc$+"k":usanS = 
esc»+"r":usoff® = esc*+"u" 

90 invon» = escS+"p":invoff* = esc®+"q":con* = esc 
*+"e":coff» = esc»+"f":normal® = esc®+"X"+CHR®(32> 
+CHR® <32 > +CHR®(64)+CHR® C122) 

100 '********** DRUCKERKOMMANDOSS **************** 

110 zal08zz® = esc®+" 0" :'za712zz® = esc®+" 1" : zal06z 
z® = esc®+" 2 ": er® = CHR»(13):lf* = CHR®<10):ff®=CH 
R$(12):einzbl® = esc®+"S"+esc®+"C”+"0"+CHR® CIO) : en 
dlos® = esc®+"c"+esc®+"CO"+CHR®(11):res® = esc®+"§ 

120 * 

130 ************** BILDSCHIRMAUFBAU ************** 

140 PRINT clr»;esc®+"X"+CHR*(32)+CHR»(72)+CHR®(64) 
+CHR®(82); 

150 PRINT clr®;invon*:PRINT cup®;CHR®(134);STRING® 
(48, CHR* (138) ) ; CHR* (140) j CHR* (133) ; SPC (15) ; " HYROGL 
YPHOS TOTAL"j SPC <16);CHR*(133 >;CHR*(131);STRING*(4 
8,CHR®(138));CHR®(137);invoff®;esc*+"0" ; 

160 PRINT normal®;cup®;CHR®(134); : FOR x = 1 TO 32: 
PRINT CHR*(138);:NEXT x:PRINT CHR»(140) 

170 FOR x = 1 TO 14: PRINT CHR®(133);SPC(32);CHR*(1 
30);x: NEXT 

180 PRINT CHR®(133);SPC(32);CHR®(130);" 15 ";uson 

®;"Normal" ; usoff® 

190 FOR x = 16 TO 30:PRINT CHR»(133);SPC(32);CHR*( 
130);x: NEXT 

200 PRINT CHR*(131);STRING*(32,CHR*(138)); CHR*(137 

) ; 

210 PRINT esc»+"X"+CHR»(40)+CHR»(80)+CHR*(36)+CHR* 
<40);"BUCHSTABE";CHR*(134);STRING* <7,CHR*(138));CH 
R® <140 >;CHR*(133>;SPC(7);CHR*(133);CHR*(131);STRIN 
G*(7,CHR* <138));CHR*(137);esc*+"X"+CHR» <32)+CHR»<3 
2)+CHR* <64)+CHR®<122) 

220 **************** MENÜE *********************** 

230 v*(1)="Buchstaben laden....":v®(2)="Buchstaben 
speichern":vS(3)="Buchstabe erstellen":v® <4)="Bu 
chstabe umÄndern":v®(6)="Text drucken.":v 


»(5)="Buchstabe löschen...":v*(7)="Inhaltsverzeich 
nis.." 

240 FOR y = 1 TO 7:PRINT esc*+"Y"+CHR*(35+y*2)+CHR 

*(100);v*(y):NEXT 

250 q=l:PRINT coff*;:GOTO 300 

260 z=ASC<INPUT»(1)> 

270 IF z = 30 THEN q=q+l:IF q=8 THEN q=l 

280 IF z = 13 THEN PRINT con®;:GOTO 330 

290 IF z = 31 THEN q=q-l:IF q=0 THEN q=7 

300 PRINT prtc»;aa®;esc®+"Y"+CHR* <35+q*2)+CHR® <100 

);getc®;invon®;v* <q);invoff»:aa*=v* <q) 

310 GOTO 260 

320 ******************** go ********************** 

330 IF q = 1 THEN GOSUB 420:INPUT"Name der vorh. B 

uchstabendatei : ", styp®: GOSUB 1130.-GOTO 250 

340 IF q = 2 THEN GOSUB 420:INPUT"Name der Buchsta 

bendatei : ",styp*:GOSUB 1110:RUN 20 

350 IF q = 3 THEN PRINT esc*+"Y"+CHR®<42)+CHR*(84) 

;:GOSUB 470:GOSUB 400:GOTO 490 

360 IF q = 4 THEN PRINT esc*+"Y"+CHR*<42)+CHR®(84) 

;:GOSUB 470:GQSUB 1140:GOSÜB 460:GOTO 490 
370 IF q = 5 THEN PRINT esc*+"Y"+CHRS<42)+CHR*(84) 
;:GOSUB 470:re = 49000!+(ASC(Buchst*))*64:FOR x = 
re TO re+64:POKE x.0:NEXT:GOTO 490 

380 IF q = 6 THEN GOSUB 420:INPUT"Name der Textdat 
ei : ".datei*:GOSUB 430:INPUT"Zeichenabstand (0-5) 
:".pixel: GOSUB 440:INPUT"Zeilenabstand (1-6) :",r 
unt:runter = 23*runt:GOSUB 760:RUN 20 
390 IF q = 7 THEN PRINT esc®+"X"+CHR*(56)+CHR*(75) 
+CHR*(42)+CHRS(73);:FILES"*.bas":PRINT normal®:GOT 
ü 250 

400 PRINT esc*+"X"+CHR*(54)+CHR®(75)+CHR®(42)+CHR* 
(73);cls*;"mit (+) wird der Pixel gelöscht":PRINT: 
PRINT"mit (-) wird der Pixel gelöscht":PRINT:PRINT 
"mit (ENTER) wird die Eingabe beendet":PRINT:PRINT 
"mit (EXIT) wird Grafik gelöscht" 

410 PRINT normal*:RETURN 

420 PRINT esc®+"Y"+CHR®(52)+CHR»(75);SPC(47);esc®+ 
"Y"+CHR* <52)+CHR* <75);:RETURN 

430 PRINT esc*+"Y"+CHR*(54)+CHR®(75);SPC(47);esc*+ 

"Y"+CHRS <54)+CHR*(75);:RETURN 

440 IF pixel <0 OR pixel >5 THEN pixel = 5 

450 PRINT esc®+"Y"+CHR®(56)+CHR*(75);SPC(47);esc®+ 

"Y"+CHR®(56)+CHR*(75); : RETURN 

460 PRINT con*; esc*+"Y"+CHR*(42)+CHR*(84); 

470 Buchst» = INPUT* (1) .-PRINT Buchst*: zu = ASC(Buc 
hst®):IF zu < 33 OR zu > 127 THEN PRINT CHR»(7):GO 
TO 350 
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480 RETURN 

490 '*************** MALEN *********************** 

500 x=l:y=l:aaS= M ":PRINT coff$;:GOTO 600 
510 z=ASC<INPUTS<1>> 

520 IF z = 6 THEN x=x+l:IF x=17 THEN x=l 

530 IF z = 1 THEN x=x-l:IF x=0 THEN x=16 

540 IF z = 27 THEN PRINT CHRS<7>;:ERASE u:DIM u<32 

,16):PRINT esc$+"X"+CHR$<33)+CHRS. <33>+CHRS <61>+CHR 

$<63>;clr$;normal$:GOTO 240 

550 IF z = 31 THEN y=y-l:IF y=0 THEN y=30 

560 IF z = 30 THEN y=y+l:IF y=31 THEN y=l 

570 IF z = 13 THEN PRINT OHRS<7)GOTO 650 

580 IF z = 22 THEN u<y,x) = 1 

590 IF z = 28 THEN u<y,x) = 0 

600 PRINT esc$+"Y"+CHRS <36>+CHR$ <78);"S= M j x;esc$+“ 
Y"+CHRS<36)+CHRS<85);"Z=" ; y 

610 IF u <y,x) THEN ab$ = invon$+"::” + lnvoff$:GOTO 
630 

620 abS = " 

630 PRINT prtc$; aai; esc$+"Y"+CHRS <32+y)+CHR$ <31+.x* 
2);getc$;InvonS;ab$;invaff$: aa$=ab$ 

640 GOTO 510 

650 ****************** DATA ********************** 

660 ERASE a:DIM a<65> 

670 s=8:FOR t = 1 TO 15 STEP 2:s=s-l:d<t)=2*s:d<t+ 
1)=2* s:NEXT 

680 FOR p = 0 TO 2 STEP 2;FOR r = 0 TO 1:FOR s = 1 
TO 16:FOR t = 1+r TO 15+r STEP 2 
690 IF u<t+p*8,s>= 1 THEN e = s+<r+p>*16:a<e) = a< 
e)+d<t) 

700 NEXT;NEXT:NEXT: NEXT 

710 FOR 1 = 16 TO 1 STEP -l:FOR k = 1 TO 30: IF u<k 
,1>=1 THEN fakt = 1+5:GOTO 730 
720 NEXT k:NEXT 1 

730 POKE <ASC<Buchst$>+50870!),fakt 

740 v = 49000! +ASC <BuchstS>*64: FOR z = 1 TO 64.-POK 

E <v+z) , a<z>:NEXT 

750 ERASE u: ERASE a:ERASE d:DIM u<32,16>:DIM a<64> 

: DIM d <16 >:z = 27:GOTO 540 

760 ' *************** DRUCKEN ******************** 

770 mitte = 80 

780 LPRINT CHR$ <27> +" §'': OPEN "R“,#1,dateiS, 1 
790 FIELD #1,1 AS b$ 

800 lang = 1:a$ = rest$:rest$ = "" 

810 FOR x = 1 TO LEN<a$>:breite = breite + PEEK <AS 

C <KID$ <a$,x,1>)+50870!)-5+pixel:NEXT 

820 GET # 1:breite = breite + PEEK<ASC<b$>+50870!> 

-5+pixel 

830 IF breite > 960 THEN IF wähl = 0 THEN wähl = 1 
:mitte = LEN <a$ > 

840 IF ASC<b$> = 10 THEN 820 

850 IF ASC<b$> = 13 THEN IF a$ = "" THEN r = 23:du 
rch = 3: GOTO 970: ELSE GOSUB 1020:a$ = a$ + SPACE* 
<mitte-lang) +*’*" : mit = mitte: mitte = 80: GOTO 910 
860 IF ASC<b5>) = 0 THEN CLOSE #1:PRINT CHR*<27)+"§ 


":RETURN 

870 IF ASC< b$ ) = 182 THEN CLOSE #1:PRINT CHR$<27> + 
" §'•: RETURN 

880 lang = lang + l:a$ = a* + b* 

890 GOTO 820 

900 **************** DRUCKEN ********************* 

910 durch = 0:r = 1 

920 LPRINT CHR$<24>;:WIDTH LPRINT 255:OPTION NOT T 
AB:LPRINT CHR$ <27)+"L"+CHR$ <192)+CHRS <3>; 

930 FOR x = 1 TO mit-1:buchst» = MID$<aS,x,l> 

940 Peter = PEEK<ASC<Buchst$)+50870!>-5+pixel:Otto 
= Peter:v = 49000!+<ASC<Buchet$)*64+durch*16>:Tab 
i = Tobi + Peter:IF Peter >16 THEN Peter = 16 
950 FOR y = 1 TQ Peter:LPRINT CHRS <PEEK <v+y> >;:NEX 
T y:FOR we = Peter TO Otto-1:LPRINT CHR$<0>;:NEXT 
we:NEXT x 

960 FOR Ellen = 960-Tobi TO 1 STEP -1:LPRINT CHR*< 
0);:NEXT:Tobi = 0 

970 LPRINT CHR$ <27> +"3"+CHRS <r) : LPRINT CHR$<13)j:d 
urch = durch + 1 

980 IF durch = 1 OR durch = 3 THEN r = 23: GOTO 920 
990 IF durch = 4 THEN LPRINT CHR$(27)+"3"+CHR4 <run 
ter>:GOTO 800 
1000 r = 1:GOTO 920 

1010 ************** TEXTER *********************** 
* 

1020 IF mitte = 0 THEN mitte = lang 

1030 IF breite < 961 THEN breite = 0:RETURN 

1040 wähl = 0:breite = 0 

1050 FOR Eva = mitte TO 1 STEP -1 

1060 lang = Eva 

1070 IF MID$<a$,Eva,1) = CHR*<32) THEN cc$ = aJ:aS 
= LEFTS<a$,Eva):rest$ = RIGHTS<ccS,LBN<cc$>-Eva)+ 
CHRS <32):RETURN 
1080 NEXT 
1090 RETURN 

1100 *************** Speichern ******************* 

1110 OPEN "O",1,stypS: FOR k = 50900! TO 57200! :PRI 
NT #1,STRS <PEEK <k)):NEXT k:CLOSE 1:RETURN 
1120 ***************** Laden ********************* 
1130 OPEN '• I" , 1, stypS: FOR k = 50900! TO 57200! : INP 
UT #1,aS:POKE k,VAL<a$):NEXT k:CLOSE 1:RETURN 
1140 '************** aendern ********************* 
1150 PRINT coffS;:de = 49000!+ASC<Buchst$>*64:FOR 
x = de TO de + 64:a<x-de> = PEEK<x):NEXT 
1160 s=8:FOR t = 1 TO 15 STEP 2:s=s-1:d<t>=2*s:d<t 
+ 1)=2* s:NEXT 

1170 FOR p = 0 TO 2 STEP 2:FOR r = 0 IO l:FOR s = 

1 TO 16:ee = a<s+<r+p)*16):FOR t = 1+r TO 15+r STE 
P 2 

1180 IF ee-d<t) >= 1 OR ee-d<t> = 0 THEN u<t+p*8,s 
) = 1: PRINT esc$ + "Y" +CHRS<32+p*8+t)+CHRS<31+s* 
2);invonSj"::"jinvaffS:ee = ee - d<t) 

1190 NEXT:NEXT:NEXT:NEXT 
1200 RETURN 


DIE JOYCE-DATABOX 
SOFTWARE FÜR DEN SUPER RECHNER 


Jetzt gibt's die Databox-Disk auch für den Joyce und außerdem als praktisches Databox-Abo. 


Alle Joyce-Programme aus dem Heft finden Sie »rea¬ 
dy to run« auf unserer praktischen Databox. 
Zusätzlich enthält die Joyce-Databox noch Bonus- 
Programme. 

Diesen Monat; Tennis — Morse — Kalender 

Einzelbezug: 

Einzelbezugspreis für DATABOX: 

Diskette 3” 24,- DM zzgl 3,- DM Porto/Verp. 

(im Ausland zzgl. 5,- DM Porto/Verpackung). 

Das Databox-Abo kostet: 

Als Diskette für 1/2 Jahr (6 Lieferungen); 


Im Inland und West-Berlin.150,- DM 

Im europäischen Ausland..160,- DM 

Im außereuropäischen Ausland.180,- DM 


Als Diskette für 1 Jahr (12 Lieferungen): 


Im Inland und West-Berlin.300,- DM 

Im europäischen Ausland. 320,- DM 

Im außereuropäischen Ausland. 360,- DM 


In den vorgenannten Preisen sind die Versand- und 
Verpackungskosten enthalten. 

Bitte benutzen Sie für Ihre Bestellung die Abo-Karte 

Zahlungsweise: 

Am einfachsten per Vorkasse (Verrechnungsscheck) 
oder als Nachnahme zuzüglich der Nachnahmege¬ 
bühr. 

(In das Ausland ist Nachnahme nicht möglich) 


Bitte Bestellkarte benutzen! DMV Verlag — Fuldaer Str. 6 — 3440 Eschwege 


Inhalt der Joyce-Databox 12/86: 


Hyroglyphos — GSX — Demo — Reisekosten 
BONUS: Tennis — Morse — Kalender 
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Wenn einer geschäftlich eine Reise 
tut, dann bringt er zumeist neben dem 
Bündel Aufträgen und Beschwerden 
auch einen Sack von Belegen, Quit¬ 
tungen und Kassenbons mit nach 
Hause. Gibt es für die Bearbeitung 
von Geschäftsunterlagen bereits eine 
Fülle von Programmen, die auf dem 
Joyce laufen, so verhüllen beim 
Thema „Reisekostenabrechnung" die 
Softwarehäuser ihre Gesichter. Es 
gibt kein solches Programm, obwohl 
sich sicher schon jeder Reisende ver¬ 
ärgert durch Bestimmungen, Tabel¬ 
len und Formulare vom Finanzamt 
gekämpft hat. Obwohl man seine 
Reisekostenabrechnung von der Buch¬ 
haltung oftmals mit der lapidaren Be¬ 
merkung „Da stimmt was nicht" 
zurückerhält und dann stundenlan¬ 
ges Nachrechnen einem den Nerv 
tötet. 

Das Programm „Traveller" zeigt wie 
es anders geht. 

Inlands-, DDR- und Auslandsreisen 
aller vier Länderkategorien, ein- und 
mehrtägige Reisen mit einer Reise¬ 
dauer von 5 bis 7 / 7 bis 10/10 bis 12 
oder über 12 Stunden werden korrekt 
nach den Vorgaben des Finanzamtes 
abgerechnet. Das Programm berück¬ 
sichtigt dabei die Zuweisung ver¬ 
schiedener Pauschalen für Über¬ 
nachtung und Verpflegung in Ab¬ 
hängigkeit vom Jahreseinkommen. 
Reisedauer und Kilometergeld wer¬ 
den ebenso berechnet wie der Kilo¬ 
meterstand vor Reiseantritt oder die 
Summen der Einzelfahrtstrecken. 
Als Ergebnis liefert „Traveller” eine 
Tabelle für die Abrechnung einer ma¬ 
ximal siebentägigen Reise mit allen 
von Buchhaltungen und Finanzämtern 
verlangten Summen und einem kur¬ 
zen Reisesteckbrief. 
Abrechnungstabelle und Reisesteck¬ 
brief werden als Formulare mit 
EXTRA und PTR auf einen DIN A 5 
Umschlag gedruckt. In diesen 
Umschlag steckt man die Belege, 
Restgeldbeträge und andere Reise¬ 


nachweise - fertig ist die Abrech¬ 
nung! 

Für diesen Leistungsumfang müssen 
eine Reihe von Eingaben gemacht 
werden, die „Traveller" über zwei 
Eingabemasken an fordert. 
Abfragemaske 1 stellt allgemeine 
Fragen: Name und Personalnum¬ 
mer, Position und Abteilung, Reise¬ 
zweck, Kilometerstand nach Beendi¬ 
gung der Reise und Anzahl der Be¬ 
lege werden abgefragt. Das Programm 
erkundigt sich dabei auch, wieviele 
Tage abgerechnet werden sollen 
(max. 7). Sind diese Angaben korrekt, 
wechselt das Programm zur zweiten 
Maske, die die Daten für die einzel¬ 
nen Reisetage entgegennimmt. Hier 
wird für jeden Tag getrennt abge¬ 
fragt: 

1. Datum des Reisetages 

2. Reisebeginn und -ende in Stunden 

3. Reiseziele 

4. Verpflegungsgeldpauschalen 

4.a) Inlands-, DDR- oder Auslands¬ 
reise 

4.b) Ein- oder mehrtägige Reise bzw. 
bei Auslandsreisen welche Län¬ 
dergruppe 

4. c) Anzahl der Bewirtungen 

5. IJbernachtungsgeldpauschale 

5. a) evtl, werden die Fragen 4.a) und 

4.b) gestellt, wenn sie noch nicht 
beantwortet worden waren 

6. a) Fahrtstrecke in km 

6. b) Kilometergeld 

7. Einzelnachweise Verpflegung, wenn 
nichteine Verpflegungspauschale 
gewählt wurde 

8. Einzelnachweise Übernachtung, 
wenn nicht eine Übernachtungs- 
pauschale vereinbart wurde 

9. Fahrtkosten unter 50km 

10. Fahrtkosten über 50km 

11. KFZ-Kosten 

12. Bewirtungsspesen 

13. Nebenkosten mit 14% MwSt. 

14. Nebenkosten mit 7% MwSt. 

15. Nebenkosten ohne MwSt. 

Sind alle Eingaben korrekt, wechselt 
das Programm zur Datenabfrage für 


den nächsten Tag. Sind alle abzu¬ 
rechnenden Tage erfaßt, beginnt das 
Programm mit der Verrechnung der 
Eingaben und der Erstellung der For¬ 
mulare. Dieser Prozeß dauert, unab¬ 
hängig von der Datenmenge, ca. 5 
Sekunden. 

Nun erscheint der Reisekostensteck¬ 
brief, der über EXTRA und PTR zu 
Papier gebracht werden kann. Ist dies 
geschehen, drücken Sie einfach RE¬ 
TURN und „Traveller" zeigt Ihnen 
die Reisekostenabrechnungstabelle, 
die ebenfalls mit EXTRA und PTR 
ausgedruckt wird. Auch dieses Bild 
verlassen Sie durch Drücken der 
RETURN-Taste. 

Was Sie bei der Eingabe der Daten 
beachten sollten: 

Frage 3 und alle Fragen ab Nummer 6 
erlauben bis zu vier Zahlenwerte als 
Eingabe. Die Zahlen müssen dabei 
durch drei Kommata getrennt wer¬ 
den. Geben Sie weniger Zahlen ein, 
müssen dennoch die Kommata ge¬ 
setzt werden, sonst erscheint die Feh¬ 
lermeldung REDO FROM START. 
Keine Eingaben heißt also drei 
Kommata setzen! Das hört sich recht 
umständlich an, aber so brauchen Sie 
z.B. beim Punkt Nebenkosten nicht 
auf einem Zettelchen Ihre Belege für 
das Brötchen in der Autobahnrast¬ 
stätte (1,50 DM), die Cola am Flug¬ 
hafen (2,60 DM) und den Stadtplan 
von London (6,90 DM) zusammen¬ 
zurechnen. Sie geben einfach 1.5,2.6, 
6.9, ein und das Programm erledigt 
die Addition für Sie. Denken Sie auch 
daran, daß DM- und Pfennig-Beträge 
durch einen Punkt getrennt werden. 
Der interne Aufbau von „Traveller”: 
Das Programm gliedert sich in 
sechs Programmteile: 

1. Initialisierungsteil (Zeilen 10 bis 40) 

2. Variablenfestlegung mit Abfrage¬ 
maske 1 (Zeilen 50 bis 1280) 

3. Abfragemaske 2 (Zeilen 1290 bis 
1630) 

4. Rechenroutinen (Zeilen 1640 bis 
2970) 

5. Druckerroutinen (Zeilen 2980 bis 
3520) 

6. Programmende (Zeilen 3530 bis 
3580) 

In Teil 2 werden den Variablen, die 
das Programm benutzt, die vom 
Finanzamt in Tabellen festgehalte¬ 
nen DM-Werte für Pauschalen 
zugeordnet. Sollten sich diese Werte 
ändern, so müssen im Programm nur 
diese Wertzuweisungen (Zeile 290 bis 
1280) geändert werden. In den Zeilen 
1160 bis 1180 werden Geldabzüge von 
der Pauschale für den Fall festgelegt. 
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daß Bewirtungen angefallen sind. 
Sieht Ihre Firma eine andere Rege¬ 
lung als für jede Bewirtung 30 % Ab¬ 
zug von der Pauschale vor, so müssen 
Sie diese Zeilen entsprechend ändern. 
Zeile 1190 bestimmt das Kilometer¬ 
geld mit 36 Pfennig pro Kilometer. 
Ändern Sie diese Angabe wenn 
nötig. 

In Teil 3 können Sie die Anzahl der 
möglichen Zahlenangaben beliebig 
ändern. Wollen Sie z.B. in Zeile 1560 


(Eingabe Nebenkosten mit 14% 
MwSt.) fünf statt vier Zahlen einge¬ 
ben, so muß hinter nl4a4(x) noch 
,nl4a5(x) hinzugefügt werden. Bei der 
dann folgenden Addition der einzel¬ 
nen Werte muß am Ende der Zeile 
+nl4a5(x) stehen. 

Genauso können auch alle anderen 
Eingabezeilen ergänzt oder gekürzt 
werden. 

In Teil 5 schließlich können Sie alle 
PRINT-Befehle durch LPRINT- 


Anweisungen ersetzen. So werden die 
von „Traveller" erstellten Formulare 
nicht auf dem Bildschirm gezeigt, 
sondern in DIN A 4-Format auf Pa¬ 
pier gebracht. 

Noch eine Anregung: Wie wäre es, 
wenn man seine Reisekostenabrech¬ 
nungen als Datei speichern könnte, 
oder das Programm auch eine Quit¬ 
tung für Vorschüsse erstellt und eine 
M wSt./V orsteuerberec hnung vomi mint? 

(Martin Böhmer) 


10 : 

20 ' ***** Initialisierungsteil ***** 

30 : 

40 esc*=CHR*(27>:cls*=esc*+"E"+escS+"H" : crlf*=CHR* 
(13)+CHR* CIO):statoff*=esc*+"0":staton*=esc*+"1":b 
l*=esc*+"A" 

50 : 

60 ' ***** Variablen festlegen ***** 

70 : 

80 : 

90 ' *** Eingangsabfrage *** 

100 : 

110 PRINT statoff*;cls*:PRINT STRING*<34" RE 
ISEKOSTBNABRECHNUNG ";STRING*<33,"="):PRINT:PRINT: 
INPUT"Ihr Name und Ihre PersonaInummer";name*,pnum 
mer 

120 PRINT:INPUT"Ihre Abteilung";abt* 

130 PRINT:INPUT"Ihre Funktion";funktian* 

140 PRINT:INPUT"über welches Jahreseinkommen verfü 
gen Sie";einkam 

150 PRINT:INPUT"Wieviel Tage möchten Sie abrechnen 
" j a 

160 PRINT:INPUT"Zweck der Reise";zweck* 

170 PRINT:INPUT"Bei Reisen mit dem Auto:Der jetzig 
e Kilometerstand"jkm 

180 PRINT:INPUT"Anzahl der beigefügten Belege";bei 

eg 

190 PRINT:PRINT:PRINT:INPUT"Alle Eingaben in Ordnu 
ng .Pj /n T " ; ards 

200 IF ord*="J" THEN GOTO 210 ELSE GOTO 110 
210 IF einkam>50000! THEN GOSUB 270:GOSUB 660:GOTO 
1160 ELSE GOTO 220 

220 IF einkam>40000! AND einkom<50000.001# THEN GO 

SUB 400:GOSUB 660:GOTO 1160 ELSE GOTO 230 

230 IF einkom>25000 AND einkom<40000.001# THEN GOS 

UB 400:GOSUB 900:GOTO 1160 ELSE GOTO 240 

240 IF einkom<25000. 001# THEN GOSUB 530:GOSUB 900: 

GOTO 1160 

250 : 

260 : 

270 ' * Inlandsvariablen für Jahreseinkommen >50.0 
00 * 

280 : 

290 pb57e=10.5:' Pauschalbetrag für eine eintägige 
Reise von 5 bis 7 Stunden 

300 pb57m=13.8:' Pauschalbetrag für eine mehrtägig 
e Reise von 5 bis 7 Stunden 

310 pb710e=17.5:• Pauschalbetrag für eine eintägig 
e Reise von 7 bis 10 Stunden 

320 pb710m=23:* Pauschalbetrag für eine mehrtägige 
Reise von 7 bis 10 Stunden 
330 pbl012e=28: ' Pauschalbetrag für eine eintägige 
Reise von 10 bis 12 Stunden 
340 pbl012m=36.8:' Pauschalbetrag für eine mehrtäg 
ige Reise von 10 bis 12 Stunden 

350 pbl2e=35: ’ Pauschalbetrag für eine eintägige R 
eise von mehr als 12 Stunden 

360 pbl2m=46:* Pauschalbetrag für eine mehrtägige 
Reise von mehr als 12 Stunden 

370 ui=39:' übernachtungsgeldpauschale Inland 
380 RETURN 
390 : 

400 * * Inlandsvariablen für Jahreseinkommen <50.0 
00 * 

410 : 

420 pb57e=9. 9 
430 pb57m=13.2 
440 pb710e=16.5 


450 pb710m=22 
460 pbl012e=26.4 
470 pbl012m=35.2 
480 pbl2e=33 
490 pbl2m=44 
500 ui=37 
510 RETURN 
520 : 

530 1 * Inlandsvariablen für Jahreseinkommen <25.0 
00 * 

540 : 

550 pb57e=9.3 
560 pb57m=12.6 
570 pb710e=15. 5 
580 pb710m=21 
590 pbl012e=24.8 
600 pbl012m=33.6 
610 pbl2e=31 
620 pbl2m=42 
630 ui=35 
640 RETURN 
650 : 

660 ' * Auslandsvariablen für Jahreseinkommen >40. 
000 * 

670 : 

680 pl30=15:' Pauschalbetrag für Ländergruppe 1 un 
d 30% des Tagegeldes 

690 p230=19.8:' Pauschalbetrag für Ländergruppe 2 
und 30% des Tagegeldes 

700 p330=24.3:' Pauschalbetrag für Ländergruppe 3 
und 30% des Tagegeldes 

710 p430=28.8:’ Pauschalbetrag für Ländergruppe 4 
und 30% des Tagegeldes 

720 pl50=25:' Pauschalbetrag für Ländergruppe 1 un 
d 50% des Tagegeldes 

730 p250=33:' Pauschalbetrag für Ländergruppe 2 un 
d 50% des Tagegeldes 

740 p350=40.5:' Pauschalbetrag für Ländergruppe 3 
und 50% des Tagegeldes 

750 p450=48:' Pauschalbetrag für Ländergruppe 4 un 
d 50% des Tagegeldes 

760 pl80=40:* Pauschalbetrag für Ländergruppe 1 un 
d 80% des Tagegeldes 

770 p280=52.8:' Pauschalbetrag für Ländergruppe 2 
und 80% des Tagegeldes 

780 p380=64.8:* Pauschalbetrag für Ländergruppe 3 
und 80% des Tagegeldes 

790 p480=76.8:' Pauschalbetrag für Ländergruppe 4 
und 80% des Tagegeldes 

800 pll00=50:* Pauschalbetrag für Ländergruppe 1 u 
nd 100% des Tagegeldes 

810 p2100=66:' Pauschalbetrag für Ländergruppe 2 u 
nd 100% des Tagegeldes 

820 p3100=81:’ Pauschalbetrag für Ländergruppe 3 u 
nd 100% des Tagegeldes 

830 p4100=96:' Pauschalbetrag für Ländergruppe 4 u 
nd 100% des Tagegeldes 

840 ul=46:' übernachtungsgeldpauschale in Ländern 
der Gruppe 1 

850 u2=60:' übernachtungsgeldpauschale in Ländern 
der Gruppe 2 

860 u3=?4:* übernachtungsgeldpauschale in Ländern 


der Gruppe 3 

870 u4=89:' übernachtungsgeldpauschale in Ländern 
der Gruppe 4 


880 RETURN . . 

890 : 

900 ' * Auslandsvariablen für Jahreseinkommen <40. 
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000 * 

910 : 

920 pl30=13.5 
930 p230=18 
940 p330=22.5 
950 p430=27 
960 pl50=22.5 
970 p250=30 
980 p350=37.5 
990 p450=45 
1000 pl80=36 
1010 p280=48 
1020 p380=60 
1030 p480=72 
1040 pl100=45 
1050 p2100=60 
1060 p3100=75 
1070 p4100=90 
1080 ul=41 
1090 u2=55 
1100 u3=69 
1110 u4=84 
1120 RETURN 
1130 : 

1140 ' * Einladungsabzüge, Kilametergeld, DDR-Paus 
chalen * 

1150 : 

1160 ein90=0.1:' 90% Abzug von der Verpflegungsgel 

dpauschale für drei Bewirtungen am Tag 

1170 ein60=0.4:' 60% Abzug von der Verpflegungsgel 

dpauschale für zwei Bewirtungen am Tag 

1180 ein30=0.7:' 30% Abzug von der Verpflegungsgel 

dpauschale für eine Bewirtung am Tag 

1190 kmgeld=0.36: ' Kiloxnetergeldpauschale 

1200 d57e=10.5:' eintägige DDR-Reise von 5 bis 7 S 

tunden 

1210 d57m=13.8:' mehrtägige DDR-Reise von 5 bis 7 
Stunden 

1220 d710e=17.5:' eintägige DDR-Reise von 7 bis 10 
Stunden 

1230 d710m=23: ‘ mehrtägige DDR-Reise von 7 bis ’10 
Stunden 

1240 dl012e=28:* eintägige DDR-Reise von 10 bis 12 
Stunden 

1250 dl012m=36.8:' mehrtägige DDR-Reise von 10 bis 
12 Stunden 

1260 dl2e=35:' eintägige DDR-Reise von mehr als 12 
Stunden 

1270 dl2ra=46: ' mehrtägige DDR-Reise von mehr als 1 
2 Stunden 

1280 du=39:‘ übernachtungsgeldpauschale DDR 
1290 : 

1300 ' ***** Dateneingabe ***** 

1310 : 

1320 FÜR x—1 TO a 

1330 PRINT cls$:PRINT TAB <48>STRING$(42,"="):PRIN 
T blt; STRINGS <41," "{"Tag";" “ ; x 
1340 PRINT:PRINT 

1350 INPUT"Datum des Reisetages:",dats<x> 

1360 INPUT”Reise-Anfang und -Ende";anf(x>,ende <x): 
rd(x)=ende(x)-anf Cx) 

1370 INPUT"Welchen Ort/welche Orte (max. 4) besuch 
ten Sie"|ortl$(x),ort2$ Cx),ort3* <x),ort4$ Cx) 

1380 PRINT:PRINT"PAUSCHALEN:" 

1390 INPUT"Verpflegungsgeldpauschale Pj/nT";wahl$ 
Cx) 

1400 IF wahlS Cx)="j" THEN INPUT"I-nlands-, D-DR- o 
der A-uslandsreise";wahlaSCx) 

1410 IF wahlS Cx)="j" AND wahlaS Cx) =" a" THEN INPUT" 
Welche Ländergruppe? Pl,2,3,oder 4r",wahlbCx) 

1420 IF wahlS<x)="J" AND wahlaSCx>="i" OR wahlaSCx 
)="d" THEN INPUT" Handelt es sich um eine e-intägig 
e oder m-ehrtägige Reise";wähle®Cx) 

1430 IF wahlS<x)="j" THEN INPUT"Wieviele Bewirtung 
en sind erfolgt? F0,1,2 oder 3J ",wahldCx) 

1440 INPUT" übernachtungsgeldpauschale Pj/n 3" " ; nach 
t$ Cx) 

1450 IF wahlaS Cx)="" AND nacht*Cx)="j" THEN INPUT" 
I-nlands-, D-DR- oder A-uslandsreise";wahlaSCx) 
1460 IF wahlaS Cx)="a" AND nachtsCx)="J" THEN INPUT 
"Welche Ländergruppe? Pl,2,3,oder 4r",wahlbCx) 
1470 INPUT"Fahrtstrecke in Kilometer";kilomalCx),k 
iloma2 Cx),kiloma3 Cx),kiloma4 Cx):ki1amCx)=kilomalCx 
)+kiloma2Cx)+klloma3 Cx)+kiloma4 Cx) 

1480 INPUT"Kilometergeld Pj /n T ";wahleSCx) 

1490 PRINT:PRINT"EINZELNACHWEISE:" 

1500 IF wahlSCx)="n" THEN INPUT"Welche Verpflegung 
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skosten hatten Sie”;vkalCx),vka2Cx),vka3Cx),vka4Cx 
>:vkCx)=vkalCx)+vka2(x>+vka3<x>+vka4Cx) 

1510 IF nacht* Cx)="n" THEN INPUT"Welche übernachtu 
ngskosten sind angefallen";unalCx>,una2Cx),una3Cx) 

,una4 Cx):unCx)=unal<x)+una2 Cx)+una3 Cx)+una4(x) 

1520 INPUT"Welche Fahrtkosten Hinter 50km7 hatten 
Sie";fkalCx),fka2 <x>,fka3 Cx),fka4Cx):fkCx)=fkalCx) 
+f ka2 Cx) +f ka3 Cx) +f ka4 Cx) 

1530 INPUT"Welche Fahrtkosten Hi her 50kmr hatten S 
ie" ; f al Cx) , fa2 Cx) , f a3 Cx) , fa4 Cx) : f k50 Cx) =f al Cx) +fa2 
Cx)+fa3Cx)+fa4 Cx) 

1540 INPUT"Wie hoch sind die Kfz-Kasten";kkalCx),k 
ka2 Cx) , kka3 Cx) , kka4 Cx) : kk Cx) =kkal Cx) +kka2 Cx) +kka3 C 
x)+kka4 Cx) 

1550 INPUT"Welche Bewirtungsspesen sind anzurechne 
n" ; bsal Cx) , bsa2 Cx) , bsa3 Cx), bsa4 Cx) : bs Cx) =bsal Cx) +b 
sa2 Cx)+bsa3 Cx)+bsa4 Cx) 

1560 INPUT"Nebenkosten Hnit Mwst. 14 %T : ”,nl4alCx 
),nl4a2 Cx),nl4a3 Cx),nl4a4Cx):nkl4Cx)=nl4alCx)+nl4a 
2 Cx)+nl4a3 Cx)+nl4a4 Cx) 

1570 INPUT"Nebenkosten Pmit Mwst. 7%T : *',n7alCx) 

, n7a2 Cx), n7a3 Cx) , n7a4 <x) i nk7 Cx)=n7alCx) +n7a2 Cx) +n7 
a3 Cx)+n7a4 Cx) 

1580 INPUT"Nebenkosten ohne Mehrwertsteuer ; " , nal 
Cx), na2 Cx), na3 Cx) , na4 Cx) : nkCx)=nal Cx) +na2 Cx) +na3 Cx 
)+na4 Cx) 

1590 PRINT:PRINT:INPUT"Alle Eingaben in Ordnung Pi 
/n T ";ord*Cx) 

1600 IF ord* Cx)="j" THEN GOTO 1610 ELSE GOTO 1330 
1610 NEXT 

1620 PRINT cls$:PRINT STRING*C34,"=");" REISEKOSTE 
NABRECHNUNG "j STRING* C33,"=") 

1630 PRINT:PRINT:PRINT "Ihre Eingaben werden jetzt 
verrechnet" 

1640 : 

1650 ' ***** Rechenrautinen ***** 

1660 : 

1670 FOR x=l TO a 
1680 : 

1690 ' * Festlegung der übernachtungspauschale * 
1700 : 

1710 IF nacht*Cx)="j" AND wahla*Cx)="i" THEN puCx) 
=ui 

1720 IF nacht*Cx)="j" AND wahla*Cx)="d" THEN puCx) 
=du 

1730 IF nacht*Cx)="J" AND wahla*Cx)="a" AND wahlbC 
x)=l THEN pu Cx)=ul 

1740 IF nacht*Cx)="j" AND wahla*Cx)="a" AND wahlbC 
x>=2 THEN pu Cx)=u2 

1750 IF nacht*Cx)="j" AND wahla*Cx)="a" AND wahlbC 
x)=3 THEN pu Cx)=u3 

1760 IF nacht*Cx)="j" AND wahla*Cx)="a" AND wahlbC 
x)=4 THEN pu Cx)=u4 

1770 IF nacht*Cx)="n M THEN pu<x)=0 
1780 NEXT 
1790 : 

1800 ' * Klassifizierung der Reisedauer * 

1810 : 

1820 FOR x=l TO a 

1830 IF rdCx)>12 THEN rdaCx) = l 

1840 IF rd Cx)>10 AND rd(x)<12.000001# THEN rdaCx> = 
2 

1850 IF rdCx)>7 AND rdCx)<10.000001# THEN rdaCx)=3 
1860 IF rd Cx)>5 AND rdCx)<7.000001 THEN rdaCx)=4 
1870 NEXT 
1880 : 

1890 1 *** Festlegung der Verpflegungsgeldpauschal 
e *** 

1900 : 

1910 FOR x=l TO a 
1920 : 

1930 ' * Inlandspauschalen * 

1940 ; 

1950 IF wähl* Cx)="j" AND wahla*Cx)="i" AND wähle*C 

x)="e" AND rda Cx)=4 THEN pvaCx)=pb57e 

1960 IF wähl* Cx)="j“ AND wahla*Cx)="i" AND wähle*C 

x)="e" AND rda Cx)=3 THEN pvaCx)=pb710e 

1970 IF wähl* Cx)="J" AND wahla*Cx)="i" AND wähle*C 

x)="e" AND rda Cx)=2 THEN pvaCx)=pbl012e 

1980 IF wähl* Cx)="j" AND wahla*Cx)="i" AND wähle*C 

x)="e" AND rdaCx)=l THEN pvaCx)=pbl2e 

1990 IF wähl* Cx)="J" AND wahla*Cx)="i" AND wähle*C 

x)="m" AND rda Cx)=4 THEN pvaCx)=pb57m 

2000 IF wähl*Cx)="J" AND wahla*Cx)="i" AND wähle*C 

x)="m" AND rda Cx)=3 THEN pvaCx)=pb710m 

2010 IF wähl* Cx)="j" AND wahla*Cx)="i" AND wähle*C 

x)="m" AND rda Cx)=2 THEN pvaCx)=pbl012m 


2030 : 
2040 • 
2050 : 


2140 : 


2160 : 


wahl*Cx)="j" 

AND 

wahla* Cx)="±" 

AND 

wähle* C 

AND rda Cx)=1 

THEN 

pva(x)=pbl2m 



* DDR-Pauschalen * 

f 



‘ wähl* Cx)="j" 

AND 

wahla* Cx)="d" 

AND 

wähle* C 

AND rda Cx)=4 

THEN 

pva Cx)=d57e 



' wähl* Cx)="j" 

AND 

wahla*Cx)="d" 

AND 

wähle* C 

AND rdaCx)=3 

THEN 

pva Cx)=d710e 



' wähl*Cx)="j" 

AND 

wahla* Cx)="d" 

AND 

wähle* C 

AND rda Cx)=2 

THEN 

pva Cx)=dl012e 



' wähl* Cx)="j" 

AND 

wahla* Cx)="d" 

AND 

wähle* C 

AND rda Cx)=1 

THEN 

pva Cx)=dl2e 



' wähl* Cx)="j“ 

AND 

wahla* Cx)="d" 

AND 

wähle* C 

AND rdaCx)=4 

THEN 

pva Cx)=d57e 



r wähl* Cx)="j" 

AND 

wahla* Cx)="d" 

AND 

wähle* C 

AND rda Cx)=3 

THEN 

pva Cx)=d710e 



f wähl* Cx) = "j" 

AND 

wahla*Cx)="d" 

AND 

wähle* C 

AND rda Cx)=2 

THEN 

pva Cx)=dl012e 



r wähl* Cx)="J" 

AND 

wahla* Cx) ="d" 

AND 

wähle* C 

AND rda Cx)=1 

THEN 

pva Cx)=dl2e 



* Auslandspauschalen * 



' wähl* Cx)="J" 

AND 

wahla* Cx)="a" 

AND 

wahlb Cx 

> rda Cx)=4 THEN pvaCx)=pl30 



f wähl* Cx)="j" 

AND 

wahla* Cx)="a" 

AND 

wahlb Cx 

) rdaCx)=3 THEN pvaCx)=pl50 



f wähl*Cx)="j" 

AND 

wahla* Cx)="a" 

AND 

wahlb Cx 

> rda Cx)=2 THEN pvaCx)=pl80 



f wähl* Cx)="j" 

AND 

wahla* Cx)="a" 

AND 

wahlb Cx 


)=1 AND rda(x)=1 THEN pvaCx)=pll00 

2210 IF wähl*Cx)="j" AND wahla*Cx>="a” AND wahlbCx 
)=2 AND rda Cx)=4 THEN pvaCx)=p230 

2220 IF wähl * Cx)="J" AND wahla* Cx) =" a" AND wahlbCx 
)=2 AND rda Cx)=3 THEN pvaCx)=p250 

2230 IF wähl* Cx)="j" AND wahla*Cx)="a" AND wahlbCx 
)-2 AND rda Cx)=2 THEN pva<x)=p280 

2240 IF wähl * Cx)="j" AND wahla*Cx)="a" AND wahlbCx 
)=2 AND rdaCx)=l THEN pvaCx)=p2100 

2250 IF wähl* Cx)="J" AND wahla*Cx)="a" AND wahlbCx 
)=3 AND rda Cx)=4 THEN pvaCx)=p330 

2260 IF wähl*Cx)="j" AND wahla*Cx)="a" AND wahlbCx 
)=3 AND rda Cx)=3 THEN pvaCx)=p350 

2270 IF wahl*Cx)="J" AND wahla*Cx)="a" AND wahlbCx 
)=3 AND rda Cx)=2 THEN pvaCx)=p360 

2280 IF wähl* Cx)="j" AND wahla*Cx)="a" AND wahlbCx 
)=3 AND rda Cx) = 1 THEN pvaCx)=p3100 

2290 IF wähl* Cx>="J" AND wahla*Cx)="a" AND wahlbCx 
)=4 AND rda(x)=4 THEN pvaCx)=p430 

2300 IF wähl*Cx)="j" AND wahla*Cx)="a" AND wahlbCx 
)=4 AND rda Cx)=3 THEN pvaCx)=p450 

2310 IF wähl* Cx)="j" AND wahla*Cx)="a" AND wahlbCx 
)=4 AND rda Cx)=2 THEN pvaCx)=p480 

2320 IF wähl* Cx)="J" AND wahla*Cx)="a" AND wahlbCx 
)=4 AND rdaCx)=l THEN pvaCx)=p4100 
2330 NEXT 
2340 : 

2350 ' * Abzüge durch Einladungen * 

2360 : 

2370 FOR x=l TO a 

2380 IF wahld Cx)=0 THEN pvCx)=pvaCx) 

2390 IF wahldCx)=l THEN pvCx)=ROUNDCpvaCx) * eln30 
> 2 ) 

2400 IF wahldCx)=2 THEN pvCx)=ROUNDCpvaCx) * ein60 
, 2 ) 

2410 IF wahldCx)=3 THEN pvCx)=ROUNDCpvaCx) * ein90 

, 2 ) 

2420 NEXT 
2430 : 

2440 ' * Kilometergeldberechnungen, Pauschal- und 
Einzel nachweissummen * 

2450 : 

2460 FOR x—1 TO a 

2470 IF wähle* Cx)="j" THEN kmgeldCx) = ROUNDCkilomCx 
)»kmgeld,2) ELSE kmgeldCx)=0 

2480 p Cx)=pv Cx)+pu Cx):* Summe der Pauschalen pro T 
35 

2490 eCx)=vkCx)+unCx):' Summe der Einzelnachweise 
pro Tag 
2500 NEXT 
2510 : 

2520 ' **» Gleich-Null-Setzen der Variablen der ni 
cht berechneten Tage *** 

2530 : 

2540 b=a+l 

2550 IF b=8 GOTO 2790 
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Ist 

DATAMAT JOYCE 

eigentlich eine Datenbank 
oder leicht zu bedienen? 


Tatsächlich ist beides zutreffend: DATAMAT JOYCE ist eine überaus bedienerfreundliche 
Datenbank, die nahezu nur über die Funktionstasten gesteuert wird. Beherrschen Sie die 
grundlegenden und immer wiederkehrenden Eingabemethoden des DATAMAT JOYCE, so 
ist die Arbeit denkbar einfach. Zu jedem Zeitpunkt werden auf dem Bildschirm alle wichti¬ 
gen Informationen und Funktionen angezeigt. Auf einen Blick erkennen Sie die aus¬ 
gewählte Datei und die Anzahl der Datensätze, die in dieser Datei gespeichert sind. Der ver¬ 
fügbare Speicherplatz, das aktuelle Datum und die derzeitige Belegung der Funktions¬ 
tasten sind weitere Informationen, die jederzeit auf dem Bildschirm dargestellt werden. Auf 
diese Art und Weise haben Sie das Programm, aber insbesondere auch Ihre Daten jederzeit 
fest im Griff. Neben einer hohen Bedienerfreundlichkeit erfüllt DATAMAT JOYCE alle Anfor¬ 
derungen einer professionellen Datenbank. Die Leistungsmerkmale im einzelnen: Pro Datei 
bis zu 32.767 verschiedene Datensätze, individuelle Formularer¬ 
stellung über komfortablen Maskeneditor, jedes Formular kann 
aus IO Bildschirmseiten bestehen, Formularauswahl über Funk¬ 
tionstasten, Satzauswahl über Mehrfach-Suchfunktion, Änderung 
eines Dateiaufbaus mit automatischer Konvertierung bereits vor¬ 
handener Datensätze, beliebige Formular-und Druckformate. Die 
Programmierung mit DATAMAT JOYCE beinhaltet im wesentlichen 
die Verknüpfung verschiedener Formulare sowie arithmetische 
Berechnungen, wobei Sie aber keine Programmiersprache erler¬ 
nen müssen, um zu programmieren,- diese Arbeit nimmt Ihnen 
DATAMAT JOYCE ab. Die leichte Bedienerführung und das aus¬ 
führliche deutsche Handbuch machen auch aus einem Einsteiger 
schnell einen Datenbank-Profi. DATAMAT JOYCE, DM 298,- 
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JOYCE für 
Einsteiger, 
248 Selten, 
DM 29,- 


Dieses Buch führt Sie Schritt für 
Schritt in die Benutzung des 
Joyce ein. Diese Einführung 
geht von der Installation der 
Geräte über eine Einleitung in 
LocoScript bis hin zur Pro¬ 
grammerstellung in BASIC und 
LOGO. Auch die wichtigsten 
Befehle des Betriebssystems 
CP/M 3.0 werden leicht ver¬ 
ständlich beschrieben. Der 
ideale Einstieg mit dem 
Joyce! 



Das große 
JOYCE-Buch, 
Hardcover, 
424 Seiten, 
DM 59,- 


Das Superbuch für jeden 
Joyce-Anwender. Alles über 
die Textverarbeitung Loco¬ 
Script und über das Betriebs¬ 
system CP/M, Bedienung, 
Anwendung und Lösungen für 
dBase, Multiplan und Word¬ 
star, BASIC-Routinen wie 
Menü- und Maskengenerator 
und rekursive Grafikprogram¬ 
mierung in LOGO. 
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DATA BECKER 
Führer zum 
JOYCE, 
ca. ISO Sei¬ 
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ca. Anfang 
Dezember, 
DM 29,80 


Befehlsreferenzen, Speicher¬ 
aufteilungen, Tabellen und. 
und, und. Der DATA BECKER 
Führer zum JOYCE stellt Ihnen 
alle diese Informationen über¬ 
sichtlich zusammen. Alles auf 
einen Blick. Schnell und gezielt 
finden Sie so für Ihre Probleme 
die optimale Lösung. Selbst 
die anfänglich etwas 
ungewohnten Jetsam- / 
Befehle werden Sie AQ 
schnell in den Griff / Cß 
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2560 FOR x=b TO 7 

2570 datS<x)="/":' Datum 

2580 rd(x)=0:' Reisedauer am Tag 

2590 kilom<x)=0:* gefahrene Kilometer am Tag 

2600 pv(x> = 0:' Verpflegungspauschale am Tag 

2610 puCx>=0:‘ übernachtungspauschale am Tag 

2620 kmgeld<x) = 0: ' Kilometergeldpauschale am Tag 

2630 vk<x)=0:' Verpflegungskasten am Tag 

2640 un(x)=0:' übernachtungskosten am Tag 

2650 fk<x)=0:' Fahrtkosten unter 50km am Tag 

2660 fk50 <x)=0: ' Fahrtkosten über 50km am Tag 

2670 kk(x)=0:' Kfz-Kosten am Tag 

2680 bs<x)=0:' Bewirtungsspesen am Tag 

2690 nkl4<x)=0:' Nebenkosten mit 14% Kwst. am Tag 

2700 nk?(x)=0:' Nebenkosten mit 7% Mwst. am Tag 

2710 nk<x)=0:' Nebenkosten ohne Mwst. am Tag 

2720 gt(x)=0:' Gesamtkosten am Tag 

2730 p(x)=0 

2740 e<x>=0 

2750 NEXT 

2760 : 

2770 ' * Summen der Reisekostenabrechnungstabelle 

* 

2780 : 

2790 rdg=rd <1> +rd<2)+rd <3)+rd<4)+rd(5)+rd(6 >+rd<7> 
; • Gesamtreisedauer 

2800 pg=p<l)+p<2)+p<3)+p<4)+pC5)+p<6)+p<7) : ’ Summe 
der Pauschalen 

2810 eg=e<1)+e<2)+e<3)+e<4)+eC5)+e<6)+e<7):‘ Summe 
der Einzelnachweise 

2820 fkg=fk<l)+fk<2)+fk<3)+fk<4)+fk C5)+fk<6)+fk <7) 

:* Summe der Fahrtkosten unter 50km 

2830 fk50g=fk50 <1)+fk50 C2)+fk50C3)+fk50 <4 > +fk50<5) 

+fk50<6)+fk50<7):' Summe der Fahrtkasten über 50 k 

m 

2840 kkg=kk(1> +kk <2> +kk(3)+kk <4)+kk <5 )+kk C6> +kk(7> 

:' Summe der Kfz-Kosten 

2850 bsg=bs<1> +bs <2 > +bs <3)+bs <4)+bs <5> +bs <6 ) +bs < 7 ) 

: ' Summe der Bewirtungsspesen 

2860 nkl4g=nkl4(1> +nkl4<2)+nkl4 <3)+nkl4 C4)+nkl4(5) 
+nkl4<6>+nkl4<?):' Summe der Nebenkosten mit 14% M 
wst. 

2870 nk7g=nk7 <1)+ nk7(2)+nk7 <3)+nk7(4)+nk7 <5)+nk7 C6 
)+nk7<7):' Summe der Nebenkosten mit 7% Mwst. 

2880 nkg=nk<1> +nk <2 > +nk(3)+nk <4 )+nk <5)+nk <6)+nk(7) 
;' Summe der Nebenkosten ohne Mwst. 

2890 kilamg=kilom<l> +kilom<2)+kilom<3)+kilom<4)+ki 
lom<5> +kilom<6)+kilom<7) 

2900 kmgg=kmgeld CD tkmgeld <2)+kmgeld<3)tkmgeld <4) + 
kmgeld <5)+kmgeld <6)tkmgeld(7) 

2910 gtg=ROUND<pg+kmgg+eg+fkg+fk50g+kkg+bsg+nkl4g+ 
nk7g+nkg,2):’ Gesamtsumme Reisekosten 
2920 : 

2930 ' * Tagessumme * 

2940 : 

2950 FOR x=l TO 7 

2960 gt Cx)=ROUND <pv <x)+pu <x) +kmgeld <x)+vk(x)+un(x) 
+ fk<x> +fk50 <x)+kk<x)+bs<x)+nkl4 <x)+nk?(x)+nk(x),2) 
2970 NEXT 
2980 : 

2990 * ***** Druckerroutinen ***** 

3000 : 

3010 : 

3020 ' *** Ausdruckblatt 1 *** 

3030 : 

3040 PRINT c1b$:PRINT STRINGS <34,"=");" REISEKOSTE 

NABRECHNÜNG " ; STRINGS <33,"=" ) : PRINT: PRINT 

3050 PRINT TAB<20)''für ";name$;" C Personal-Nr. : 

";pnummer;" >" 

3060 PRINT TABC20) funktionS;" in der "jabtS 
3070 PRINT: 

3080 IF datS(a)>dat$<1 > THEN PRINT “Betreff: Reise 
vom ";datS<l>;" bis zum ";datSCa):GOTO 3100 
3090 IF datS(a)=dat$ <a) THEN PRINT "Betreff: Reise 
am “j datS <1> 

3100 PRINT:PRINT"Reisezweck: ";zweck$ 

3110 PRINT:PRINT 

3120 PRINT“Tag";TABC18);"Antritt";TAB<27> ; "Ende" ; T 
AB<36);"Dauer";TABC45);"Besuchte Orte":PRINT 
3130 FOR x=l TO a 

3140 PRINT datS <x>;TABC17);anf <x>;"Uhr"j TABC26);en 
de <x);"Uhr";TAB <35);rd <x>;"Std";TAB<45); ortlS<x); " 
";ort2S <x);" ";ort3$ <x>;" " ; ort4S <x) 

3150 NEXT 

3160 PRINT:PRINT 

3170 begkm=km-kilomg:IF begkm >0 THEN PRINT"Tachos 
tand bei Reisebeginn:begkm 


3180 IF km >0 THEN PRINT"Taobostand bei Reise-Ende 
: " ; km 

3190 IF kilomg >0 THEN PRINT"Gefahrene Kilometer:" 

;kilomg 

3200 PRINT:PRINT 

3210 PRINT"Anzahl der Belege:beleg 
3220 INPUT"",weiters 
3230 IF weiterS="" THEN GOTO 3270 
3240 : 

3250 ' *** Ausdruckblatt 2 CTabelle) *** 

3260 : 

3270 PRINT clsS:PRINT STRINGS<34,"=");" REISEKOSTE 
NABRECHNUNG ";STRINGS<33,"="):PRINT:PRINT 
3280 PRINT "Reisetag";TAB<18);datS<1);TAB<27);dat$ 
<2);TABC36);dat$<3);TABC45);datS <4);TAB<54);datS <5 
);TAB <63);datS<6);TAB <72 >;datS<7);TAB <81) "Summe" 
3290 PRINT "Reisedauer";TAB<18);rd<1);TAB<27);rd<2 
);TAB <36);rd<3);TAB<45);rd<4);TAB <54); rd<5) ; TAB<63 
);rd<6);TAB<72);rd<7) ; TAB<81) ; rdg 

3300 PRINT "Fahrtstr. in Km";TAB<18) ; kilomCl) ; TAB< 
27) ; kilom<2); TAB<36) ; kil,om<3) ; TABC45) ; kilom<4> ; TAB 
<54);kilom<5);TAB<63) ; kilom<6);TABC72) ; kilom<7) ; TA 
B <81) ; kilomg 
3310 PRINT 

3320 PRINT "PAUSCHALEN:" 

3330 PRINT "Verpflegungsk.";TABC18);pv<l);TABC27); 
pv<2>;TAB<36);pv<3);TABC45);pv<4>;TABC54) ; pv<5) ; TA 
B <63 >;pv <6);TAB <72);pv <7);TAB <82);"x" 

3340 PRINT "Übernachtungen";TAB<18);pu<l);TAB<27>; 
pu <2);TAB<36);pu <3);TAB <45>;pu <4);TAB<54);pu <5);TA 
B<63);pu <6);TABC72);pu C7);TABC82) ; "x" 

3350 PRINT "Summe";TAB<18);p<l);TAB<27); p<2);TABC3 

6) ;p<3);TABC45);p<4);TAB<54);p <5>;TAB<63) ; p<6) ; TAB 
<72);p<7);TAB <81);pg 

3360 PRINT "Kilometergeld";TABC18);kmgeldCl);TAB<2 

7) ;kmgeld<2);TAB<36);kmgeld<3);TAB<45); kmgeld<4) ; T 
AB <54) ; kmgeld <5);TAB <63);kmgeld<6);TAB<72);kmgeld< 
7);TAB <81);kmgg 

3370 PRINT 

3380 PRINT "EINZELNACHWEISE:'• 

3390 PRINT "Verpflegungsk.";TABC18);vk<l);TABC27); 
vk <2);TAB <36);vk<3);TAB <45);vk<4);TAB<54);vk<5);TA 
B<63);vk<6>;TAB<72);vk<7);TAB<82); "x" 

3400 PRINT "Übernachtungen";TAB<18);un<l); TABC27); 
un<2) ; TAB<36);un<3);TAB<45);un<4);TAB<54);un<5>;TA 
B<63> ; un<6);TAB<72);un<7);TAB<82);"x" 

3410 PRINT "Summe";TABC18);e <1);TABC27) ; e C2) ; TAB<3 

6) ;e <3);TAB<45);e C4>;TAB<54);e <5);TAB<63) ; e <6) ; TAB 
<72);e<7);TAB <81);eg 

3420 PRINT 

3430 PRINT "Fahrtk. <50km";TAB <18); fk<l) ; TAB<27) ; f 
k<2);TAB <36);fk<3);TAB<45);fk<4);TABC54);fk<5>;TAB 
<63);fk<6>;TAB<72>;fk<7>;TAB<81) ; fkg 
3440 PRINT "Fahrtk. >50km";TAB<18);fk50<1);TAB<27) 

;fk50 <2);TAB <36 >;fk50<3);TAB <45);fk50<4);TAB<54) ; f 
k50<5);TABC63);fk50<6);TAB<72);fk50<7) ; TABC81) ; fk5 
0g 

3450 PRINT "Kfz-Kosten";TAB<18);kk<l) ; TABC27) ; kk<2 
);TAB <36);kk <3);TAB <45);kk <4);TAB <54);kk <5);TAB <63 
);kk<6);TAB<72>;kk<7>;TAB<81) ; kkg 

3460 PRINT "Bewirtung";TABC18);bs<l) ; TABC27); bs<2) 

;TAB <36);bs<3);TABC45);bs<4);TABC54);bs<5>;TAB <63) 

;bs<6);TABC72);bs<7) ; TABC81) ; bsg 
3470 PRINT "Nebenkosten" 

3480 PRINT " mit Mwst. 14%";TABC18);nkl4 <1);TAB<2 

7) ;nkl4C2>;TAB<36);nkl4 <3);TAB<45);nkl4 <4>;TABC54) 
;nkl4<5);TAB<63);nkl4 <6);TAB<72);nkl4 <7);TAB<81);n 
kl4g 

3490 PRINT " mit Mwst. 7%";TAB<18);nk7<1);TAB<27 
);nk7<2) ; TAB<36);nk7 <3);TAB<45);nk7 C4>;TABC54);nk7 
(5);TAB <63);nk7 <6);TAB <72);nk7 <7);TAB <81);nk7g 
3500 PRINT " ohne Mwst.";TAB <18);nk <1);TAB <27) ; nk < 

2) ;TABC36);nk<3>;TAB<45);nk C4>;TABC54>;nk<5);TAB<6 

3) ;nk<6);TABC72);nk<7>;TAB <81);nkg 
3510 PRINT 

3520 PRINT "Gesamtkosten";TAB<18);gt<l);TAB<27);gt 
<2);TABC36);gt<3>;TAB<45);gt C4) ; TAB<54> ; gt<5); TAB< 
63);gt<6>;TABC72);gt <7);TAB <81) ; gtg 
3530 : 

3540 ' ***** Pragrammende ***** 

3550 : 

3560 INPUT"",endeS 

3570 IF endeS="" THEN PRINT cls$:PRINT:PRINT:INPUT 
"Vollen Sie eine weitere Reisekostenabrechnung dur 
chf Uhren ? PJ /nT " , ewahlS 

3580 IF ewahl$="j" THEN GOTO 10 ELSE PRINT statonS 
;clsS:END 
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Colossus 4.0 

Ein Schachprogramm neuester 
Technik 

Seit etwa zwei Monaten gibt es, nach 
3D-Clock-Chess, ein weiteres Schach¬ 
programm, das über CP/M auf Joyce 
läuft: Colossus Chess 4.0 von der bri¬ 
tischen CDS-Software Ltd. 

Die vom Anbieter mitgelieferte Ge¬ 
brauchsanleitung - in englischer 
Sprache - erweist sich mit über 20 Sei¬ 
ten Text als sehr umfassend und aus¬ 
führlich. Schon beim ersten Überflie¬ 
gen stellte ich fest, daß verschiedene 
Arten von Schachliebhabern durch 
das Programm angesprochen wer¬ 
den. 

Nach dem Laden von Colossus Chess 
4.0 taucht kurz die Einschaltgrafik 
des Spiels auf. Danach sieht der Be¬ 
nutzer im linken oberen Bildschirm¬ 
feld ein dreidimensionales Brett, mit 
den weißen Figuren im Vordergrund 
(kann nicht invertiert werden). 
Rechts unten erscheinen, unter dem 
Namen "Colossus” und "OPPO¬ 
NENT", in tabellarischer Form die 
Spielzeit und darunter die Züge. 
Vorgegeben sind nach dem Start: die 
weißen Steine für den Benutzer, freie 
Partie ("Average Game”, Uhren in 
Nullstellung) und die dreidimen¬ 
sionale Darstellung. Diese etwas 
unübersichtliche Brettgrafik kann 
nach Bedarf mit CTRL-Q ("Dimen- 
sions”) in eine zweidimensionale An¬ 
zeige umgeschaltet werden. 

Das Programm ist nicht menuege- 
steuert, das heißt, die verschiedenen 
Schwierigkeitsgrade und Spielmög¬ 
lichkeiten müssen gemäß der Anlei¬ 
tung per Tastencode angew'ählt wer¬ 
den. Zu den alternativen Spielarten 
gehören unter anderem Turnier¬ 
schach, Blindschach, Blitzschach 
und Problemschach. Die Stellungs¬ 
beurteilung richtet sich sowohl nach 
materiellen als auch nach positionei¬ 
len Kriterien. 


Weiterer Programmstandard sind 
das geregelte Ausdrucken, sowie das 
Laden und Speichern von Spielzügen 
- auch einzelne Problem- oder Stu¬ 
dienstellungen lassen sich auf 
Diskette abspeichern. 

Die elektronischen Steine werden 
entweder über die Eingabe der Koor¬ 
dinaten (Ausgangsfeld, neues Feld) 
oder durch Cursorsteuerung gezogen. 
Da der Cursor - dargestellt durch 
einen invertiert eingezeichneten 
Querstrich - für den Weißspieler 
immer auf dem Feld al und für den 
Schwarzen auf h8 erscheint, ist es in 
diesem Modus ratsamer, die Figuren 
mit dem obligatorischen < RETURN > 
und den entsprechenden Koordina¬ 
tenangaben „direkt” zu bewegen, denn 
beim ausführlichen Testen bereitete 
mir das Autorepeat der vier Cursor¬ 
tasten (durch kontinuierlichen Tasten¬ 
druck) doch wegen seiner überemp¬ 
findlichen Reaktionen leichte Pro¬ 
bleme im Blitzschachmodus. Ein Tip 
am Rande - von den Ausgangsfeldem 
zieht man längs der waagerechten 
Reihen und senkrechten Linien ent¬ 
schieden rascher per Zahlencode, als 
mit den Cursortasten, wobei die 
Reihenfolge, in der die Koordinaten 
benannt werden, unerheblich ist. 

Für den praktischen Spielbetrieb bie¬ 
tet Colossus ein vielseitiges Angebot: 
Semiprofis können mit ihm Turnier¬ 
schach oder freie Partien spielen, blit¬ 
zen, Meisterpartien und deren Analy¬ 
sen auf dem Bildschirm ausführlich 
studieren und dabei Züge zurückneh¬ 
men, neu aufbauen und so weiter - 
Manipulationen, die mit Brett und 
Figuren oft umständlicher nachzu¬ 
vollziehen sind. Die ausgefallene 
Spezies von Spielern, die nicht nur 
ihren Briefträger auf Trab hält (Abtei¬ 
lung Fernschach), sondern auch das 
lokale E-Werk beschäftigen möchte, 
kann mit dem Programm ihre aktuel¬ 
len Stellungen bei Mondschein ana¬ 
lysieren lassen (das kann sich, nach 
eigenen Erfahrungen, über Stunden 
hinziehen). Dem Schachanfänger ist 
Colossus ein geduldiger Lehrer, der 
alle nach den Regeln erlaubten Züge 
anzeigt. Sehr gewitzte Spieler können 
sogar Blindschach mit dem Programm 
spielen, da es gestattet, wahlweise nur 
die weißen, nur die schwarzen oder 
alle Figuren vom Brett verschwinden 
zu lassen. 

Mit einem Bonbon und Novum für 
Studienexperten und Problemloser 
überrascht Autor Martin Bryant 
seine Kundschaft - und hier wurde 
wirklich allerneueste Programmier¬ 
technik angewandt - indem nicht nur 


Standardmatts, sondern auch Hilfs- 
und Selbstmatts vom Programm in 
jeweils bis zu 7 Zügen, einschließlich 
möglicher Farbwahlen zu lösen sind. 
Es fehlen zwar Märchenschachfigu¬ 
ren, wie Grashüpfer, Nachtreiter, 
Mao, Tao etc., doch ist das Angebot 
für Problemschacher nicht auch so 
schon ein überlaufendes Füllhorn? 
Ich bin der Meinung, dem Program¬ 
mierer gebührt an dieser Stelle ein 
dickes Lob, denn mir ist kein 
Schachprogramm bekannt, das 
Hilfs- und Selbstmatts anbielet. 
Erwähnenswert ist schließlich noch 
die "Peitsche" ("Wipe”), die es 
Problem- und Studienfreunden er¬ 
möglicht, die Stellungen rascher auf¬ 
zubauen. Dies ist vor allem bei Posi¬ 
tionen mit wenigen Figuren eine an¬ 
genehme Erleichterung. Außerdem 
ist dem Program m ein umfangreicher 
"Variantenkoffer” mit über 3000 
theoretischen Positionen und Varia¬ 
tionen beigefügt - es werden dabei 
selbst Zugumstellungen erkannt. 
Eine weitere Zugabe sind die auf 
Diskette mitgelieferten Beispielpar¬ 
tien, die von verschiedenen bekann¬ 
ten Schachprogrammen (Mephisto 
III, Elite A/S, Cray Blitz) gespielt wur¬ 
den, und dem Computerfreund ein¬ 
mal die Leistungsfähigkeit heutiger 
Programme zeigen. 

Die Benutzerführung und Spiel¬ 
stärke von Colossus - selbst Routi¬ 
niers dürften sich zwischenzeitlich 
ungezählte Schweißperlen von der 
Stirn wischen - ist in der Tat einmalig. 
Hier war mit M. Bryant ein wirklicher 
Kenner des Schach-Metiers und ein 
absoluter Top-Programmierer am 
Werk, der den gut gelösten Versuch 
unternahm, allen Nuancen des Spiels 
und der Spieler möglichst gerecht zu 
werden. Selbst der Exschachweltmei¬ 
ster Michael Botwinnik, der in beiden 
Gebieten ein erfahrener Experte ist, 
hätte daran seine wahre Freude. 
Doch sollte man zum Verstehen der 
Bedienungsanleitung über ausgie¬ 
bige englische Sprachkenntnisse ver¬ 
fügen - dies ist wohl der einzige Ma¬ 
kel am Programm für den hiesigen 
Benutzer. (W.Rausch) 
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ALGO-Rhythmus 

Hersteller: ALGO-SOFT 
Vertrieb: ALGO-SOFT 
Rechner: Joyce 
Programm: Turbo-Pascal 
Preis: 149- DM (ca.) 

Der erste Stoßseufzer des Rezensen¬ 
ten: „Schon wieder eine Adressver- 
waltung mit Serienbriefen". Danach 
der fast schon Routine gewordene 
Test und die Suche nach sensationel¬ 
len Neuerungen. Und siehe da, man 
wird sogar fündig. Sensationen viel¬ 
leicht nicht unbedingt, aber immer¬ 
hin, kleine Neuerungen, die eine Re¬ 
view wert sind. 

Wie bereits erwähnt, handelt es sich 
bei „ALGO-Rhythmus” um eine 
AdressVerwaltung mit Serienbrief¬ 
editor. Üblich für Durchschnittspro¬ 
gramme in dieser Sparte, sind neben 
den Druckmöglichkeiten für Briefe, 
Etiketten und Adresslisten,ein Editor 
für Briefe und eine Adressverwal- 
tung. Das ist alles vorhanden, wenn 
auch manchmal etwas anders als bei 
anderen Programmen. Das fängt 
schon bei der Adressverwaltung an. 
Sie bietet als Auswahlkriterien zwei 
indizierte Schlüsselfelder und drei 
weitere nicht indizierte Selektionsfel¬ 
der an, die jedoch nicht mit den 
eigentlichen Datenfeldern identisch 
sind. Konkret heißt das also, daß, 
wenn eine Liste beispielsweise nach 
der Postleitzahl sortiert sein soll, die 
Postleitzahl zweimal eingetragen 
werden muß: einmal als Sortier¬ 
schlüssel, das andere Mal als Eintrag 
in das Datenfeld. Diese Methode 
schränkt zwar die Sortiermöglichkei¬ 
ten etwas ein, ist allerdings auch 
etwas einfacher zu bedienen. 

Auf einer Diskette können bis zu 500 
Daten stehen, eine Verteilung größe¬ 


rer Bestände auf mehrere Disketten 
ist aber möglich. Dies kann eventuell 
sogar notwendig sein, da leider nur 
eine einzige Datei auf einer Diskette 
verwaltet werden kann. 

Der Ausdruck der Daten/Briefe kann 
entweder die gesamte Liste umfassen 
oder Teilbereiche, die durch die 
Schlüssel- und Selektionsfelder im 
„von...bis”-Verfahren ausgewählt wer¬ 
den können. 

Eine weitere Besonderheit ist die lei¬ 
stungsfähige Anredenverwaltung. Sie 
ermöglicht die Erstellung von bis zu 
15 individuellen Anreden. So ist es 
durch entsprechende Eintragung 
möglich, das Anredespektrum vom 
formellen „Sehr geehrter Herr (Nach¬ 
name)” bis zum .Allerliebste (Vor¬ 
name)” zu gestalten. 

Die Art der Anrede der betreffenden 
Person wird in der Adressdatei ver¬ 
merkt. Praktischerweise kann man in 
der Adressverwaltung eine Seite auf- 
rufen, die die Anrede so darstellt, wie 
sie später im Druck erscheint. 

Das Briefeerstelien ist auch eine Sa¬ 
che für sich. Der Briefkopf mit Ab¬ 
senderangabe ist installierbar, das 
„Format" jedoch nicht. 

Wurde eine Adresse ausgewählt, so 
läuft der Vorgang automatisch ab, 
erst nach der Anrede hat der Anwen¬ 
der dann wieder das Sagen. Die Da¬ 
ten für die Adresse werden aus der 
Datei an die richtige Stelle übernom¬ 
men, einen Einfluß auf die Gestal¬ 
tung hat der Anwender jedoch nicht, 
es ist auch nicht möglich, Teile aus 
dem Datenbestand an anderer Stelle 
einzufügen. Die Bedienung wird da¬ 
durch zwar wesentlich vereinfacht, 
Flexibilität ist jedoch nicht mehr 
möglich. 

Eine direkte Anrede innerhalb des 
Briefes ist also nicht möglich, dafür 
braucht sich der Anwender auch 
nicht mehr mit ominösen Steuerzei¬ 


chen oder Layouts herumzuschlagen 
und erhält seinen Brief versandfertig 
für Fensterumschläge, was auch 
nicht zu verachten ist. 

Auch mit dem Druck ist das eine Ge¬ 
schmackssache. Die Parameter für 
die Druckqualität können in einem 
vorbildlichen Menue ausgewählt 
werden, allerdings nur global für den 
Brief, lokale Veränderungen wie z.B. 
Hervorhebungen sind nicht möglich. 
Auch hier wieder Einschränkung der 
Flexibilität zu Gunsten einer einfa¬ 
chen Bedienung. (Ein Kommentar zu 
Handbuch und Arbeitsgeschwindig¬ 
keit entfällt leider, da leider nur eine 
Demoversion zur Verfügung stand.) 

Noch ein Wort zur Bedienung: die 
Menues sind einfach und übersicht¬ 
lich. Etwas ungewohnt war jedoch die 
Auswahl der Menuepunkte, die 
durch die 'EINBL’ statt der ’ENTER’- 
Taste erfolgt, aber daran gewöhnt 
man sich recht schnell. 

Fazit: 

,ALGO-Rhythmus” ist wohl in erster 
Linie an die Anwender gerichtet, die 
eine einfache Bedienung der größe¬ 
ren Flexibilität vorziehen. 

Allerdings weist das Programm auch 
Features wie z.B. Kontrolle und fle¬ 
xible Gestaltung der Anreden oder 
die komfortable Druckerbedienung 
auf, die es angenehm von anderen 
Programmen abheben. 

Alles in allem ein gelungenes Pro¬ 
gramm zu einem fairen Preis. 

(Michael Anton) 
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Programmiersprache COMAL 

Pascal zu kompliziert? Basic zu "alt”? Logo unzuralchand? 
Warum nicht gleich C0MAL-80 

Diese Sprache ist strukturiert, schnell und modern. Auch Computerneulinge können 
schon nach 14 Tagen fließend programmieren. 

COMAL-80 wird in verschiedenen Bundesländern für den Schulunterricht empfohlen 
und vielfach in Universitäten eingesetzt: 

Jatzt auch für lila Schneldar CPC Computer 

Diskette COMAL-80 Version 1.83 mit Handbuch DM 69- 
C0MAL-80 Modul in Vorbereitung 

COMALGRUPPE-OiUTSCHLAND 

Fi. D. Balz, 2270 Uttran/Führ, Tel.: 04883/500 Madam 554 


SINDELEXfB£Z 

“ Software für alle CPC’s 

Joyce u. die neuen Schneider PC’s 

© • Auftragsbearbeitung DM 398,- 

■o • Finanzbuchhaltung DM 278,- 

^ # Vereinsverwaltung DM 198,- 

■§ • Adressverwaltung DM 98,- 

C Wir führen für Sie gegen Aufpreis auf der Basis unserer 
3 Grundmodule jede Änderung oder Anpassung durch. 

Js (Auch kompl. Neuentwicklungen gegen Vorlage eines Pflichten- 
W heftes). 

"BYTE mETDfnPUTEBSVSTEITlE 

Wilhelmstr. 7 • 5240 Betzdorf • Tel. (02741)23537 u. 23107 
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Fibu-Star Plus 

Vertrieb: Star Division 
Rechner: Joyce/CPC 6128 
Preis: 298- DM (ca.) 

Bereits im Jahr 1980 erschien das 
Programm FIBU M auf dem heiß 
umkämpften Markt für Business- 
Software. Das Programmpaket, ange¬ 
paßt für verschiedene CP/M-Rech- 
ner, ermöglichte dem Benutzer die 
komplette Finanzbuchhaltung nach 
den Grundsätzen ordnungsgemäßer 
Buchführung. Noch vor einigen 
Monaten mußte man dafür rund DM 
1.000- auf den Ladentisch legen. 

Die Lüneburger Firma Star Division 
hat jetzt eine Neuauflage dieses 
Programmpakets unter der Bezeich¬ 
nung „Fibu-Star Plus” veröffentlicht, 
um auch Joyce- und CPC 6128 Besit¬ 
zer in den Genuß der wirklich kom¬ 
fortablen Finanzbuchhaltung zu 
bringen. Der Verkaufspreis von DM 
298,- macht „Fibu-Star” auch für 
Kleingewerbetreibende erschwinglich. 
Getestet habe ich das Paket auf dem 
Schneider Joyce 8256. Es ist aber 
empfehlenswert, für einen profes¬ 
sionellen Einsatz ein zweites Lauf¬ 
werk anzuschaffen bzw. den Joyce 
Plus einzusetzen. Warum das so ist, 
kann man dem folgenden Bericht 
entnehmen. 

„Fibu-Star Plus” wird auf zwei 
Disketten, zusammen mit einer 
deutschen Anleitung, in einer stabilen 
Kunststoffbox geliefert. Es ist ratsam, 
die Anleitung vor dem ersten 
Programmeinsatz durchzulesen. Wer 
sich mit Buchhaltung auskennt - und 
nur solche Computerbesitzer werden 
sich wohl „Fibu-Star” zulegen - wird 
mit der Einarbeitung keinerlei Pro¬ 
bleme haben. Durch den logischen 
Aufbau der einzelnen Programmteile 
und die gute Dokumentation, aber 


firma abgespeichert. Anhand dieses 
Übungsteils will ich den Umgang mit 
„Fibu-Star Plus” schildern. 

Der erste Arbeitsschritt ist der Aufruf 
des Programmteils STAMM, hinter 
dem sich die Stammdaten-Pflege ver¬ 
birgt (siehe Bild 1). Der Anwender 
wird aufgefordert, a) die Laufwerk- 
Nummer, b) die Buchhaltungs- 
Nummer und c), das aktuelle Tages¬ 
datum einzugeben. Danach muß die 
Diskette gegen die Datendiskette aus¬ 
getauscht werden. 

Diese Arbeitsgänge wiederholen sich 
bei jedem Disketten- bzw. Programm¬ 
teilwechsel. Grundlage für die Arbeit 
in der Finanzbuchhaltung ist der 
Kontenrahmen, der hier festgelegt 
wird. Unterteilt nach Debitoren, Kre¬ 
ditoren und Sachkonten, können bis 
zu 400 Konten angelegt werden. Die 
jeweilige Kontonummer besteht aus 
sechs Ziffern, von denen die erste 
vom Programm festgelegt wird, der 
Rest vom Anwender definierbar ist. 
Neben Kontonummer und Bezeich¬ 
nung sind bei den Sachkonten 
weitere Kennzeichnungen möglich. 
RF erlaubt die Eingabe einer Rechen¬ 
formel zur automatischen Steuer- 
herausrechnung. 

VD erlaubt die Verdichtung eines 
Kontos, also eine Zusammenzichung 
einzelner Buchungen. Mit KZ wird 
dem Programm mitgeteilt, ob es sich 
um ein normales oder ein gesperrtes 
Konto handelt. Das Kürzel USTVA 
erlaubt die Eingabe der Zeilennum¬ 
mer der amtlichen Umsatzsteuer¬ 
voranmeldung. 

Zu jeder Zeit kann die Dateneingabe 
durch eine Kennziffer beendet wer¬ 
den. Ist der Kontenrahmen erstellt, 
kann so auch dieser Programmteil 
verlassen werden. Die nächsten Me- 
nuepunkte ermöglichen die Eingabe 


der eigenen Firmenstammdaten (Be¬ 
zeichnung und Wirtschaftsjahr) 
sowie die Einrichtung von bis zu 30 
Steuerzeilen. Gemeint sind damit die 
Rechenformeln, die bei Sachkonten¬ 
buchungen benötigt werden (14% 
oder 7 % MwSt. usw.). Wenn alle Ein¬ 
gaben zur Zufriedenheit des Benut¬ 
zers abgeschlossen sind, kann er über 
die verbleibenden Optionen den 
Kontenplan aller drei Konten arten 
und die Stammdaten zu Papier brin¬ 
gen. Das ist auch unbedingt 
notwendig, um bei der täglichen Ar¬ 
beit den Kontenplan immer zur 
Hand zu haben. 

Wird der Programmteil STAMM 
ordnungsgemäß verlassen, erfolgt 
eine automatische Sicherung der 
Daten. 

Der nächste Programmteil ist dem 
Erfassen der Buchungen gewidmet, 
wird also in der Buchhaltung fast täg¬ 
lich benötigt. Der Ladevorgang ent¬ 
spricht dem Stammdatenteil. Das 
Hauptmenue bietet die Wahl zwi¬ 
schen Erfassen mit und ohne Proto¬ 
koll. Die auf dem Monitor erschei¬ 
nende Bildschirmmaske erlaubt pro 
Buchung folgende Einträge: 
Konto-Nr.: 

Erwartet wird eine Nummer aus 
dem Kontenstamm. 

Eingabe UC- 

Hier kann eine abgespeicherte Re¬ 
chenformel eingesetzt werden 
Eingabe Datum: 

Einzugeben sind Tag und Monat 
Eingabe Beleg: 

Erwartet wird eine fünfstellige Be¬ 
legnummer, die der Benutzer frei de¬ 
finieren kann. 

Eingabe G.-Konto: 

Den Regeln der doppelten Buchfüh¬ 
rung entsprechend, muß hier das Ge¬ 
genkonto eingegeben werden. 
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Eingabe UC: 

Rechenformel für Gegenkönto 
Eingabe Betrag: 

Der Buchungsbetrag kann negativ 
oder positiv eingegeben werden, je 
nachdem, ob es sich um eine SOLL- 
oder HABEN-Buchung handelt. Die 
Gegenbuchung erfolgt automatisch. 
Eingabe Text: 

Für den Buchungstext stehen maxi¬ 
mal 17 Zeichen zur Verfügung. 
Eingabe Skonto: 

Erlaubt die Buchung von Skontobe¬ 
trägen 
Eingabe B: 

Buchungsschlüssel für normale 
Buchung, Stornierung oder ungültige 
Buchung. Dieser Programmteil er¬ 
möglicht die Eingabe von bis zu 500 
Buchungen, was für kleinere Betriebe 
als Tageswerk ausreichen dürfte. 
Sind mehr Buchungen notwendig, 
müssen die bisherigen erst auf Kon¬ 
tenblättergedruckt werden, wobei der 
Speicher gelöscht und damit für 
weitere Eintragungen frei gemacht 
wird. 

Die nächsten Programmteile werden 
hauptsächlich für den Monatsab¬ 
schluß benötigt. Dazu wird erst der 
Programmteil SORTaufgerufen. Alle 


erfaßten Buchungen werden jetzt 
nach Datum und Belegnummer sor¬ 
tiert. Das folgende Buchungsjournal 
und die Kontenblätter können dann 
in chronologischer Reihenfolge aus¬ 
gedruckt werden. Dazu wird Pro¬ 
grammteil JOURNA geladen, mit 
dem man sich die Buchungen noch 
einmal auf dem Monitor ansehen 
und danach in Journalform aus- 
drucken kann (siehe Bild 2). Vor dem 
Ausdruck der einzelnen Kontenblät¬ 
ter ist dieser Programmschritt unbe¬ 
dingt erforderlich. 

Um die einzelnen Konten auch auf 
dem Papier festzuhalten, muß man 
sich entsprechende Formulare besor¬ 
gen (der „Fibu-Star Plus”-Vertrieb 
hält diese bereit; siehe Bild 3). Ist der 
Drucker entsprechend bestückt, er¬ 
folgt über den Programmteil KON¬ 
TEN der Ausdruck. 

Der letzte Schritt beim Monatsab¬ 
schluß läuft unter der Bezeichnung 
Auswertungen. Gemeint sind damit 
die Summen- und Saldenlisten der 
einzelnen Kontenkreise und - sehr 
angenehm - der Ausdruck der 
Umsatzsteuer-Voranmeldung. Um 
die Finanzbuchhaltung abzurunden, 
kann am Jahresende mit dem 


Programmteil JAHEND der Jahres¬ 
wechsel durchgeführt werden. Die 
Salden der Kunden- und Lieferan¬ 
tenkonten werden dabei automatisch 
in das neue Wirtschaftsjahr über¬ 
tragen. 

Schon nach relativ kurzer Einarbei¬ 
tungszeit hatte ich mit den einzelnen 
Arbeitsgängen von „Fibu-Star Plus” 
keine Schwierigkeiten. 

Fehleingaben werden ausgeschlossen. 
Das Programmpaket „Fibu-Star 
Plus” bietet dem Anwender damit 
tatsächlich eine komplette Finanz¬ 
buchhaltung, die an Komfort und 
Leistungsfähigkeit kaum Wünsche 
offen läßt. Natürlich erlaubt die Spei¬ 
cherkapazität der verwendeten Rech¬ 
ner nur einen begrenzten Umfang der 
Buchhaltung. Mit 400 Konten und 
500 Buchungen wurde aber ein guter 
Kompromiß gefunden. (R. Knorre) 
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ZWEI NEUE ANWENDUNGSGEBIETE FÜR DEN JOYCE PCW 8256/8512 
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❖ JOYCE PCW 8256/8512 - DICTIONARY SET * 


Der Nachfolger des bekannten CPC-Computer Dictionary 
ist jetzt auch für den 'OYCE PCW in verbesserter Version 
erhältlich 

• ELEKTRONISCHES WÖRTERBUCH & VOKABELTRAINER 

• ca. 40.000 fest gespeicherte Vokabeln 

• ca. 20.000 fest gespeicherte Stichwörter 

• minimale Zugriffszeiten 

• individuell erweiterbar 

• Lernerfolg durch neuen VOKABELTRAINER 

• Das SET beinhaltet die beiden Versionen ENGLISCH/ 
DEUTSCHS, DEUTSCH ENGLISCH auf 3” Disketten 

• Ausgezeichnete Testberichte in 
SCHNEIDER INTERNA TIONAL und CPC-MAGAZIN 

• über lOOOfach auf dem Schneider CPC bewährt 

• Pull Down Menue 

• DEUTSCHE Bedienungsanleitung 

• Eine wertvolle Hilfe in Schule und Beruf 

• Ein sinnvolles Weihnachtsgeschenk!!! 

JOYCE PCW DICTIONARY-SET nur DM 149.90* 

CPC DICTIONARY-SET nur DM 99.90* 

DICTIONARY-SET SCHNEIDER PC nur DM 99.90* 

(ab ca. 01.01.1987) 


Peter Herzog 

Abt. Versand Thomas Müller 
Postfach 2361 - Nonntal 27 
D-8240 BERCHTESGADEN 
HOTLINE 0 86 52/6 30 61 -6 2049 



SOFT 


* WARENWIRTSCHAFTSSYSTEM PCW-SPORT SHOP * 


für den Sport-, Textil-, und Schuheinzelhändler mit einem 
Jahresumsatz bis maximal DM 500.000 
Uns ist es gelungen, in Zusammenarbeit mit Fachhändlern und 
Unternehmensberatern ein WWS (WarenWirtschaftssystem) zu 
einem unglaublichen Komplettpreis zu entwickeln, um EDV auch 
bei kleineren Unternehmen erfolgreich einsetzen zu können. 

• Wertvolle Entscheidungshilfen beim Waren- ein- und VERKAUF 

• Macht Geschäftsvorgänge transparent 

• Detaillierte Analysen über alle Geschäftsabläufe 

• Ermöglicht rationelles und wirtschaftliches Arbeiten 

• Wareneingangsregistrierung mit gleichz. Preisetikettendruck 

• Kurzfristige Erfolgsrechnungen (KER) für Warengruppen, 
Lieferanten, Verkäufer etc. (keine FIBU-KER) 

• Warenausgangsjournal 

• Lagerbestandsüberwachung 

• Grafische Datenaufbereitung auf Bildschirm od. Drucker 

• 10OO Doppel-Klebeetiketten sind im Preis enthalten 

• detaillierte DEUTSCHE Bedienungsanleitung 

• u. v. a. m. 

Dies ist ein kleiner Auszug der Leistung des WWS SPORT-SHOPS. 
Bitte fordern Sie unseren SPEZIALPROSPEKT gegen eine 
Schutzgebühr von DM 2.00 an! ES LOHNT SICH. 

WWS SPORT-SHOP JOYCE PCW nur DM 990.—* 

WWS SPORT-SHOP SCHNEIDER PC nur DM 1490.—* 

(erweitert) (ab ca. 01.02.1987) 


Auch diese beiden Programme können bei unseren über 20 
autorisierten ZS-Soft Fachhändlern direkt erworben werden. 
DER ZS-SOFT Fachhändler - IHR COMPUTERPARTNER VOR ORT 


' - unverb. Preisempfehlung 
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Turbo-FAKTURA 

Hersteller: Richter Software 
Vetrieb: Richter Software 
Autor: H. Weigand 
Sprache: Turbo-Pascal 
Preis: DM 199 - (ca.) 
lauffähig auf CPC' 6128 und Joyce 

„Turbo-FAKTURA” - das schnelle 
Fakturierprogramm für Schneider 
CPC 6128 und Joyce. 

Was bietet uns das Programm mit dem 
schnellen Namen? 

In erster Linie einmal ein komplettes 
System zur Erstellung von Rechnun¬ 
gen. wie sie in jedem Gewerbe anfal¬ 
len. Darüber hinaus gibt es noch eine 
Artikel- und eine Adressendatei, die 
natürlich untereinander kommuni¬ 
zieren, sprich Daten austauschen. 
Dazu aber gleich mehr. 

Vorab möchte ich behaupten, daß 
„Turbo-FAKTURA” zu den anwen¬ 
derfreundlichsten Programmen ge¬ 
hört, die ich je getestet habe. Wer sich 
nur ein wenig mit seinem Computer 
auskennt, wird die deutsche Anlei¬ 
tung zu diesem Programm kaum be¬ 
nötigen, einmal abgesehen von der 
Erstinstallation, die aber auch keine 
Probleme mit sich bringt. 

Jetzt aber zur praktischen Seite: 

Hat man die Erstinstallation, zu der 
auch die Anlage einer Datendiskette 
gehört, abgeschlossen, ist „Turbo- 
Faktura” einsatzbereit. Bild 1 zeigt 
das Hauptmenue, aus dem die einzel¬ 
nen Programmoptionen aufgerufen 
werden können. 



Bild 1 

Die ersten Arbeitsgänge bestehen der 
Logik entsprechend aus der Anlage 
einer Artikel- und einer Adressdatei 
sowie der Bearbeitung der Stammda¬ 
ten. Zwar kann der Anwender auch 
ohne diese Dateien Rechnungen 
schreiben, wird auf diese Weise die 
Möglichkeiten des Programmes aber 
nie ausschöpfen. Ich setze also 
voraus, daß der zukünftige Faktura- 
Anwender einen bestimmten Artikel- 
und auch Kundenstamm hat. 

Unter Option Stammdaten können 
einige Parameter, die schon vorgege¬ 
ben sind, den eigenen Bedürfnissen 


entsprechend angepaßt werden. Vor¬ 
gegeben sind: 

Beginn der Rechnungsnummer = 1 
Mehrwertsteuersatz 1 = 14% 
Mehrwertsteuersatz 2 — 1 % 
Rechnungsformular Kopf- und 
Fußzeilen, Zeilen pro Seite und Zei¬ 
len pro Anschrift. 

In der Regel werden die Voreinstel¬ 
lungen kaum geändert werden müs¬ 
sen. Die Artikeldatei, wie auch die 
Adressendatei, erleichtern das spätere 
Erstellen der Rechnungen erheblich. 
In Kurzform die Daten, die eingesetzt 
werden können: 

Artikeldatei: (siehe Bild 2) 
Artikelnummer, Mehrwertsteuersatz 
1/2, Lagerort, Artikelbezeichnung, 
Einkaufs- und Verkaufspreis Brutto 
(der jeweilige Nettopreis wird auto¬ 
matisch errechnet und eingesetzt), 
Bestand, Mindestmenge, Bestellmen¬ 
ge, Rabatt. 
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Bild 2 

Adressendatei: 

Firmenbezeichnung. Anrede, Name, 
Vorname, Straße, Wohnort. 

Hat man diese Arbeit, die ja in diesem 
Umfangnureinmal anfällt, bewältigt, 
können die frisch angelegten Dateien 
auf Tastendruck in Listenform auf 
dem Drucker ausgegeben werden. 
Das Erstellen einer Rechnung ist ge¬ 
nauso einfach wie der sonstige 
Umgang mit „Turbo-Faktura". Nach 
Aufruf der entsprechenden Menue- 
Option erscheint eine vordefinierte 
Bildschirmmaske. Abgefragt werden 
nur die Daten, die das Programm 
nicht selbständig erkennen kann. 
Begonnen wird mit der Kundennum¬ 
mer. Die dazu gehörige Anschrift 
wird danach zur Kontrolle auf den 
Bildschirm gebracht, was mit einem 
Tastendruck quittiert werden muß. 
Ebenso wird auch mit der Artikel¬ 
nummer verfahren, die zu einer 
Nummer gehörenden Daten werden 
also der Artikeldatei entnommen und 
übertragen. 

Hat man alle gewünschten Positio¬ 
nen in die Rechnung eingetragen, 
kann man noch Skonto (in Prozent) 
und Porto (als Betrag) einsetzen. 
Danach wird die Rechnung zu Papier 
gebracht. 


Eine der Annehmlichkeiten von 
„Turbo-Faktura” ist, daß die berech¬ 
neten Artikel-Stückzahlen in diesem 
Moment in der Artikeldatei abge¬ 
rechnet werden. Wird eine vorher be¬ 
stimmte Mindestmenge erreicht bzw. 
unterschritten, erfolgt eine Rückmel¬ 
dung an den Benutzer. Dieser kann 
jetzt auf Wunsch eine Besteiliste aus- 
drucken. Ein optimaler Lagerbestand 
ist damit immer kontrollierbar. 

Die Rechnung ist so, wie sie aus dem 
Drucker kommt, versandfertig. Das 
Programm druckt auf Wunsch übri¬ 
gens auch eine oder mehrere Kopien 
für die Buchhaltung. Sondertexte wie 
die eigene Finnenanschrift, die Bank¬ 
verbindung oder Werbung für Son¬ 
derangebote kann der Benutzer 
durch die Option "Rechnungstexf ein¬ 
setzen. Dort steht ihm eine kleine 
Textverarbeitung zur Verfügung, die 
für solche Zwecke völlig ausreicht. 
Hier können auch Druckercodes ge¬ 
ändert werden, um die Rechnung 
optisch zu gestalten (z.B. eigene An¬ 
schrift im Fettdruck etc.). 

Laut Herstellerangabe können auf 
einer Datendiskette maximal 500 Ar¬ 
tikel und rund 700 Anschriften (beim 
Joyce Plus ca. 1400 Anschriften) ver¬ 
waltet werden. Damit bietet „Turbo- 
Faktura” genug Spielraum, um mit 
einem Kleingewerbe zu wachsen. 
Wer darüber hinaus noch das 
Programm Turbo-Adress vom glei¬ 
chen Hersteller hat, kann mit einem 
Umsetzungsprogramm eine Verbin¬ 
dung zu Turbo-Faktura hersteilen. 

Getestet habe ich das Programm 
übrigens mit einem Joyce PCW 8256, 
also einem Rechner mit nur einem 
Laufwerk. Positiv zu bemerken ist, 
daß beim Ladevorgang alle Pro¬ 
gram mteile in die RAM-Disk geladen 
werden. Das lästige Wechseln zwi¬ 
schen Programm- und Datendiskette 
entfällt also. 

Ein weiterer Pluspunkt, der neben der 
anwenderfreundlichen Gestaltung 
und der hohen Leistungsfähigkeit zu 
dem außerordentlich positiven Ge¬ 
samteindruck beiträgt. 

(Rolf Knorre) 
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Die Zukunft hat begonnen! 
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Star-t 


1. Text- 
Verarbeitung 

2. Adress- 
Verwaltung 

3. Graphik- 
Programm 

4. DFÜ- 
Programn 


einzigartige 
Textsystem 
verfügt über 
4 verschiedene 
Arten der Be 
nutzerführung 

Der Anwender 
lernt und 

wächst mit _ 

dem System. 

Ob Sie lieber mit der Maus, dem Pull-Down- 
Menue, Funktionstasten oder mit Controll- 
Codes arbeiten, dieses Textsystem paßt sich 
Ihren Fähigkeiten Schritt für Schritt an. 
Anfänger oder Profi, STAR-WRITER PC 
hält allen Ansprüchen stand. 

• Gleichzeitiges Bearbeiten von bis zu 7 Do¬ 
kumenten. 

• Graphiken können in den Text eingebun¬ 
den werden. 

• Formatierte Ausgabe auf dem Bildschirm 
(WYSWYG). 

• Floskeltasten und Macrofunktionen. 

• Erstellung von Rundschreiben. 

• Erstellung von selbstrechnenden Formu¬ 
laren. 

• Erstellung eines Stichwort- und Inhalts¬ 
verzeichnisses. 

• Ausführliches Handbuch und Übungsteil. 


STAR-WRITER PC 

Das Textsystem für den Schneider PC 
und alle IBM-Kompatiblen-Rechner! 






UELZENER STR. 12 
2120 LÜNEBURG 
FERNRUF (041 31) 402550 
TELEX 2 182 221 stard 


' COUPON t 

Coupon bitte ausfüllcn, ausschneiden und an .STAR-DIVISION schicken, ■ 

□ Bille schicken Sic mir 

kostenlos und unverbindlich 
Informationen über 
STAR-WRITER PC 


□ 


Bitte schicken Sie mir 
STAR-WRITER PC zum 
Einfuhrungspreis von 
DM 298,-. 


PLZ/Ort. 


Für Schneider PC und alle IBM-Kompatiblen-Rechner ah 256 KB mil Mrmodirnm- oder Citefikorte. jf 

^ Alle Preise sind unverbindliche Preiscmpfchlungen zzgl. DM 11),- für Porto und Verpackung Jr 
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Tomahawk 


Hersteller: Digital Integration 
Vertrieb: Fachhandel 
Preis: ca 59,- DM 
Rechner: Joyce 


Spielesoftware für die Joyce Rechner 
ist schwer im kommen. Jüngstes Bei¬ 
spiel dafür, daß man auch mit die¬ 
sem System gute Spiele programmie¬ 
ren kann, ist Tomahawk. Grundsätz¬ 
lich handelt es sich hier um einen 
Echtzeit-Flugsimulator, dessen grafi¬ 
sche Präsentation auf dem Monitor 
durchaus als gelungen bezeichnet 
werden kann. Wie schon bei einigen 
anderen Joyce-Spielen, handelt es 
sich bei „Tomahawk” um eine 
Adaption eines CPC-Programms. 



Der Spielinhalt, einerseits zwar wirk¬ 
lich ausgezeichnet gestaltet, ist recht 
kriegerisch - gilt es doch, einen AH- 
64A-Apache Kampfhelicopter in die 
Luft zu bekommen, und dort ange¬ 
langt, ein gewisses Territorium von 
feindlichen Truppenteilen zu säu¬ 
bern. 

Bei der Entwicklung des Programmes 
wurden einige Helicopterpiloten zum 
Testen herangezogen; darin ist 
sicherlich die Ursache des hohen 
Realismus dieses Programmes zu 
suchen. Abgesehen von gerätespezifi¬ 
schen Details, wie Farbe und Sound, 
trifft auch hier alles zu, was in der Re¬ 
view in unserem Heft 8/86 über die 
CPC-Version gesagt wurde. 

(HS) 



Grafikfähiges Mallard-BASIC 
mit GSX 


Lange haben die Joyce-Besitzer auf 
diesen Moment warten müssen, doch 
jetzt ist es soweit: GSX heißt die 
Zauberformel, die auch unter Mallard- 
BASIC das Tor zur Welt der Grafik 
öffnet Alle notwendigen Zutaten be¬ 
finden sich auf den Joyce-Systemdis¬ 
ketten und lassen sich relativ leicht 
installieren - nur eine ausreichende 
Dokumentation des Herstellers fehlte 
bislang. Doch fangen wir von vorne 
an: 


Was ist eigentlich GSX? 


Das GSX (Graphical System EX- 
tension) wurde zu Beginn dieses 
Jahrzehnts von Digital Research (den 
Entwicklern von CP/M) als weitge¬ 
hend hardwareunabhängige Grafik¬ 
schnittstelle im Zusammenwirken 
mit den Betriebssystemen CP/M (3.0 
bzw. PLUS und 86) und MS-DOS 
entwickelt, und stellt quasi ein virtuel¬ 
les Grafikgerät zur Verfügung. Es 
wird stets in einem Koordinatensy¬ 
stem gearbeitet, das auf beiden Ach¬ 
sen von 0 bis 32767 reicht. In diesem 
Koordinatensystem ermöglicht GSX 
die Darstellung von Linien, Punkten, 
mit Mustern gefüllten Flächen, Krei¬ 
sen, Tortenstücken, Farben, Texten 
und anderes mehr. 

Für die Umsetzung in die tatsächlich 
vorhandene Auflösung des Gerätes 
sind Treiberprogramme zuständig, 
die den einzigen hardwareabhängi¬ 
gen Teil des GSX darstellen. Durch 
dieses Konzept der externen Schnitt¬ 
stelle zur Hardware kann eine Grafik 
mit dem selben Programm durch die 
Änderung nur eines Parameters 
sowohl auf den Bildschirm als auch 
auf den Drucker ausgegeben werden, 
wobei die Grafik auf beiden Geräten 
(soweit möglich) gleich aussieht. Lei¬ 
der steht und fällt die Leistungsfähig¬ 
keit von GSX mit den Fähigkeiten der 
Treiberprogramme. Gerade die Bild¬ 
schirmtreiber sind in den meisten 
Fällen recht schwach, so daß z.B. 
Kreise nicht unterstützt werden - da 
hilft nur selbst programmieren. 

Die Treiber haben unter CP/M die 
Namen DD*.PRL; der * steht dabei 
für eine Buchstabenfolge, die ab¬ 
hängig von dem Gerät ist (z.B. * = 
SCREEN, wenn der Treiber den 
Bildschirm versorgt). GSX kennt je¬ 


doch die Namen der Treiber über¬ 
haupt nicht, sondern greift über 
Nummern auf sie zu, die in der Datei 
ASSIGN.SYS vereinbart werden. 
Dabei steht in dieser Datei zeilen¬ 
weise jeweils eine Nummer, ein Leer¬ 
zeichen und der Dateiname des 
Treiberprogramms. Folgende Zuord¬ 
nungen können getroffen werden: 

1 — 10 —• Bildschirm 
11 - 20 - Plotter 
21 - 30 — Printer 
31 - 40 - Metafiles 
41 - 50 — Andere Geräte 

Wie man sieht, können für ein und 
dasselbe Gerät mehrere Treiberpro¬ 
gramme vorhanden sein (maximal 
10), wobei die Nummern, beginnend 
mit der kleinsten, steigend vergeben 
werden. Wichtig ist weiterhin, daß das 
größte Programm in der Datei AS¬ 
SIGN.SYS an erster Stelle steht, weil 
GSX danach seinen Speicherbedarf 
einrichtet. Auf den Joyce-Systemdis¬ 
ketten (Seite 3 und 4) werden folgende 
Treiber mitgeliefert: 

- DDFXHR8.PRL: High Resolution- 
Treiber für Epson FX-kompatible 
Drucker mit 8 Bit-Schnittstelle 

- DDFXLR8.PRL: Wie oben, aber 
Low Resolution (geringere Auflösung) 

- DDSCREEN.PRL: Bildschirmtreiber 

- DDHP7470.PRL: Treiber für Hew¬ 
lett-Packard-kompatible Plotter. 

Das GSX kann im Prinzip mit jedem 
beliebigen lauffähigen Programm 
(COM-File) Zusammenarbeiten, in¬ 
sofern es genug Speicherplatz frei¬ 
läßt. Um dieses Programm für die 
Zusammenarbeit mit GSX vorzube¬ 
reiten, muß es vorher mit dem 
Programm GENGRAF.COM (Syn¬ 
tax: GENGRAF Dateiname) behan¬ 
delt werden. 


Arbeiten mit GSX 


Um ein grafikfähiges BASIC zu züch¬ 
ten, sollte man sich als erstes eine Ar¬ 
beitsdiskette erstellen. Dabei ist fol¬ 
gende Vorgehensweise zu empfehlen: 
1. Starten Sie den Rechner mit Seite 2 
der Systemdisketten und führen Sie 
folgende Eingaben aus (mit <RE~ 
TURN> ist die Taste gemeint): 
PIP <RETURN> 
M:=BASIC.COM <RETURN> 
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CP/M Plus tostrad Consuner Electronics plu 
v 1.2, filX TPA, 1 LauftierR, 112K Laufwerk H: 


r 


_.7M 3 PIP JPSION 3.0 
«i 4ASIC.CM 
: =*.SyS 

CQPVING - 
ASSIGN.SVS 
GSX.SVS 
*K:=DD*.* 

CGF7INC - 

WFXHR8.PBL 

»F30B8.PE 

DDSCREEH.PRL 

«K;=<ENGMF.COH 

* 

fl)TYPE H:fiSSIGW.SYS 


21 f 

22 i 
11 S 
01 f 


DDFXHK8 
DDFXLR8 
DDHP7476 
DO SC RUN 


A)«:CENCRAF H BASIC 


GENCRAF 1.0 IS Nov 82 
Copyright (0 1982 
Digital Research, Inc. 

Serial No S666-1232-6S4321 

All Rights Reserve«! 

ft>EJ?ASE NfGEHGRAF.COK 
A)PIP 

CP/M 3 PIP VERSION 3.6 
*A:=M;*,* 


COPVING - 
ASSIGn.SYS 

GSX.SYS 

DDFXHK8.PRL 

DDFXLR8.FRL 

DDSCREEN.PRL 

BASIC,CO« 

* 

ft', 


Bild 1: 

Die Bildschirmmeldung bei Erstellung der 
Arbeitsdiskette 

A/BASIC 


CSX-80 1.1 61 Oct 83 
Copyright (O 1383 
Digital Research, Inc. 

Serial No SÖ66-1232-6S4321 

All Rights Reserved 


Nillard-30 BASIC yjth Jetsa« Version i,2S 
(c Copyright 1984 Loctwotive Sofbare Ltd 
All rights reserved 


172SS free bytes 
01 


Bild 2: 

So meldet sich das graßkfähige BASIC 


2. Legen Sie jetzt Seite 4 der System¬ 
disketten ein und geben Sie ein: 
M:=*.SYS <RETURN> 
M:=DD*.* <RETURN> 
M:=GENGRAF.COM<RETURN> 

3. Nur wenn ein Plotter angeschlossen 
ist: Seite 3 der Systemdiskette ein¬ 
igen und M:=*.PRL < RETURN> 
eingeben. 

4. <RETURN> drücken. 

5. TYPE M:ASSIGN.SYS 
<RETURN > 

Auf dem Bildschirm wird die Zu¬ 
ordnung der Nummern zu den 
Treiberprogrammen ausgegeben; 
sie sollte mit der Hardcopy in Bild 1 
übereinstimmen. Dann folgen die 
Eingaben: 

6. M:GENGRAF M:BASIC <RE- 
TURN> 

ERASE M:GENGRAF.COM 
<RETURN> 

7. Weiter mit Seite 2 der Systemdis¬ 
kette. Geben Sie ein: 

PIP <RETURN> 

8. Legen Sie eine leere, formatierte 
Diskette ein und geben Sie ein: 
A:=M:*.* <RETURN> 

9. <RETURN> drücken. 

Die obige Beschreibung gilt für die 
Arbeit mit nur einem Laufwerk. Be¬ 
sitzer einer Maschine mit zwei Lauf¬ 
werken können in Laufwerk B gleich 
die leere Arbeitsdiskette einlegen. Bei 
dem obigen Prozeß kann dann M: je¬ 
weils durch B: ersetzt werden; Punkt 7 
und 8 entfallen. 

Wenn Sie nun BASIC <RETURN> 
eingeben, meldet sich Mallard- 
BASIC wie in Bild 2 ersichtlich. Für 
die weitere Arbeit ist zu beachten, daß 
sowohl die verwendeten Treiber als 
auch GSX.SYS und ASSTGN.SYS 
von BASIC jederzeit erreichbar sein 
müssen, d.h. sich auf derselben 
Diskette befinden sollten. Damit sind 
aber alle nötigen Vorbereitungen ge¬ 
troffen, und wir kommen jetzt zu dem 


GSX-Demolisting: Beginnen Sie am 
besten mit den Zeilen ab 50000 und 
speichern Sie sie separat auf Diskette 
ab. Die dort befindlichen vier 
Unterprogramme werden auf jeden 
Fall für die Arbeit mit GSX benötigt; 
Sie können sie bei Bedarf mit 
MERGE an andere Programme an- 
hängen. Was sich hier im einzelnen 
abspielt, wird sofort erläutert: 

Das Unterprogramm ”Init GSX” (ab 
50000) dimensioniert zunächst einige 
Arrays, die für den Datentransfer mit 
GSX zuständig sind. Sie haben fol¬ 
gende Bedeutung: 

- pb% (Parameterblock) übergibt die 
Startadressen der folgenden fünf 
Felder. 

- contrl% (Control-Feld) ermöglicht 
die Auswahl verschiedener GSX- 
Funktionen. 

- intin% (Integer-Input) übergibt 
ASCII-Codes (Strings) und diverse 
andere Werte. 

- ptsin% (Points-Input) übergibt Gra¬ 
fik-Koordinaten. 

- intout% (Integer-Output) und ptsout% 
(Points-Output) dienen zur Rück¬ 
gabe von Werten an den Anwender. 

In den Zeilen 50020 - 50040 wird ein 
kleines Maschinenprogramm in den 
Speicher gePOKEt, das den Kontakt 
zum Betriebssystem herstellt. Es 
führt, wie bei CP/M üblich, einen 
BDOS-Aufruf über die Adresse 0005 
aus; die Funktionsnummer 115 im C- 
Register sorgt dafür, daß sich GSX 
angesprochen fühlt. In Zeile 50050 
wird dann ein weiteres Unterpro¬ 
gramm (Open Workstation) aufgeru¬ 
fen, das den Bildschirm (device%=l) 
als Arbeitsgerät initialisiert; zu der 
Arbeit mit einem Drucker oder Plot¬ 
ter kommen wir später. Mit "Close 
Workstation” (GOSUB 50170) kann 
das aktuelle Arbeitsgerät wieder ab¬ 
gemeldet werden. 



Neu — Neu — Neu — Neu! 


MERCATOR - Flbu + Plus 

flexible Dialogbuchhaltung - datevlike ncl auiom OP's, 
Kunden/Lieferanten, autom Uoernahme in Kontenplan, 
Mahnungen, SerienDriefe für Joyce/Joyce-Plus 

jetzt komplett nur 

Studlo-Fakt-Plus: (nur PC's) 

dto mit Kunoen-Lieferanten, Serienbriefe 

StudloScrlpt: (nur PC's) 

Pulldown-Menü, MailMerge. wordstarkompat.bel 

* Muster + Lerndiskette für Mercator DM 57, - 

COMPUTER - STUDIO - OFFENBACH 

Kleiner Biergrund 17 6050 Offenbach 

Telefon (069) 81 0613 - oder im Fachhandel 


GSX-Grafik-nfreiber BASIC. 

(für Striche, Kästchen, Polygon¬ 
züge = Kreise, Kuchen,Torten, 
Männchen). Endlich kann die 
Grafik-Fähigkeit der JOYCE 
genutzt werden! 64,- 

Standardleistungsbuch (StLB) 
für das Bauwesen auf 3"-Diskettenü 

- für Gartenbau 

- für Hochbau 

- für Elektrotechnik 

- für Gas. Wasser, Abwasser 

- für Wasserwirtschaft Pr. a. Anfr. 
Schach „3-D Clock Chess“ 

für JOYCE 59,- 


Aufrüstung JOYCE auf JOYCE Plus 

- RAM-Erweiterung von 256 KB 
auf 512 KB, Orig.-RAM-Baust, 

mit ausführl. Einbauanltg. 119,- 

- 2. Laufwerk FD-2, 1 MB 579,- 

PaplerfUhrung JOYCE-Drucker 
für exakten Papiereinzug und 
Wiederholgenauigkeit 37,- 

Bildschirmfilter für 

- GT 64/65 bis 12/85 49,- 

- CTM644 69,- 

- JOYCE 79,- 

3"-Disk. CF2,250 KB 10 St. 109,- 
3"-Disk.CF2DD, 1 MB 5St. 99,- 


Telefon (0 70 71) 6 60 22 

G + W • Hartmeyerstraße 50 • 7400 Tübingen 
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Jedes BASIC-Programm, das auf 
GSX zugreift, muß zu Beginn die 
Initialisierungsroutine mit GOSUB 
50000 aufrufen. Zu beachten ist, daß 
dabei der Bildschirm gelöscht und 
der Textcursor abgeschaltet wird; er 
kann bei Bedarf mit PRINT CHRS 
(27);”e”; wieder sichtbar gemacht 
werden. Klar sollte weiterhin sein, 
daß nach dem Aufruf kein Befehl wie 
CLEAR oder DEFINT folgen darf, 
der die durch ”Init GSX” definierten 
Variablen löscht. 

Um eine GSX-Funktion auszufüh¬ 
ren, dient das Unterprogramm 
”GDOS-Aufruf’ (GOSUB 60000): 
Hier wird der Parameterblock pb% 
mit den Adressen der anderen Arrays 
versorgt. Leider muß das bei jedem 
Aufruf von neuem geschehen, da 
Mallard-BASIC die Felder bei jeder 
unpassenden Gelegenheit im Spei¬ 
cher herumschiebt. 

Für Assemblerfreaks ist noch interes¬ 
sant, daß durch die spezielle Form 
des CALL's in Zeile 60060 die Adresse 
des Parameterblocks ins DE-Register- 
paar geschrieben wird; GSX holt sich 
dann alle weiteren Informationen di¬ 
rekt aus den BASIC-Arrays. 

Bevor wir gleich mit diesen Hilfsmit¬ 
teln die ersten Linien auf den 
Bildschirm zaubern, hier noch eine 
eindringliche Warnung: GSX gibt im 
Gegensatz zu BASIC keine Fehler¬ 
meldungen aus, sondern beliebt zu 
schmollen, falls es mit schwerver¬ 
daulichen Parametern oder nicht 
vorhandenen Arrays konfrontiert 
wird - mit anderen Worten, der Rech¬ 
ner verzieht sich mitsamt Speicherin¬ 
halt ins elektronische Nirwana. Spei¬ 
chern Sie also ein Programm grund¬ 
sätzlich ab, bevor Sie es starten! 


Keine Grafik 
ohne Koordinaten 


Alle GSX-Funktionen beziehen sich 
auf ein Koordinatensystem, das in 
der unteren linken Ecke des 
Bildschirms mit dem Punkt (0,0) sei¬ 
nen Ursprung hat. Es erstreckt sich, 
wie gesagt, sowohl horizontal (x- 
Achse) als auch vertikal (y-Achse) bis 
32767, der größten Integer-Zahl. 
Dabei wird von GSX automatisch in 
Rechnung gezogen, ob die unterste 
Zeile durch Statusinformationen be¬ 
legt ist oder nicht. Es empfiehlt sich 
also, bei der Ausgabe von Grafik die 
Statuszeile mit PRINT CHRS(27);”0”; 
auszuschalten, um eine maximale 
vertikale Auflösung zu erzielen. 


Mit diesem Wissen können wir uns 
jetzt der ersten Grafik-Funktion 
zuwenden, die auf den schönen Na¬ 
men „Polyline'’ hört, und eine vorge¬ 
gebene Anzahl von Punkten durch 
Linien verbindet. Zu diesem Zweck 
muß das Controlfeld mit folgenden 
Informationen versorgt werden: 
contrl%(l)= 6 (Funktionsnummer) 
contrl%(2)= Anzahl der Punkte 
Bevor dann mit GOSUB 60000 der 
eigentliche GSX-Aufruf erfolgt, gehö¬ 
ren noch die Punktkoordinaten 
xl,yl,x2.y2... in das Points Input-Feld 
(ab ptsin%( l)). Da dieses Array bis 
100 dimensioniert ist, kann also 
theoretisch mit einem einzigen Aufruf 
ein Fünfzigeck gezeichnet werden! 
Soweit wollen wir es hier allerdings 
nicht treiben, sondern zunächst ein 
kleines Unterprogramm vorstellen, 
das mit Hilfe der Polyline-Funktion 
eine Linie von (xl,yl) nach (x2,y2) 
zieht. Sie finden es in dem Demo-Li- 
sting ab Zeile 10000, und bei dieser 
Gelegenheit möchten wir auch gleich 
eine Konvention vorschlagen, die für 
alle kommenden Programmbeispiele 
gelten soll: 

- Die Initialisierungsroutinen und 
der GSX-Aufruf belegen die Zeilen¬ 
nummern ab 50000. 

- Unterprogramme für spezielle Gra¬ 
fikfunktionen werden ab 10000 ab¬ 
gelegt. 

- Das Hauptprogramm befindet sich 
im Bereich 1 - 9999. 

Auf diese Weise können wir mit der 
Zeit eine Grafikbibliothek einrich¬ 
ten, deren Elemente nach Bedarf mit 
MERGE zusammengestellt werden. 
Um das Draw Line-Unterprogramm 
auszuprobieren und sich mit dem 
Koordinatensystem vertraut zu ma¬ 
chen. können Sie zunächst das 
Hauptprogramm für die Lissajous- 
Figuren weglassen und es durch das 
folgende Segment ersetzen: 

10 GOSUB 50000:REM Init GSX 
20 PRINT CHR$(27);”H”;CHR$(27) 
;”e”; 

30 INPUT xl,yl,x2,y2 
40 GOSUB 10000:REM Draw Line 
50 GOTO 30 

und damit haben Sie schon ein klei¬ 
nes, wenn auch sehr primitives Zei¬ 
chenprogramm. Die Eingabe 0,0, 
32000,32000 zieht z.B. eine Linie dia¬ 
gonal über den gesamten Bildschirm, 
mit den Werten 1000,2000,1000,2000 
wird dagegen nur ein einziger Punkt 
gesetzt. 


Wie bereits erwähnt, kann Polyline 
natürlich wesentlich mehr, als nur 
einzelne Punkte oder Linien zeich¬ 
nen. So ist es ohne weiteres möglich, 
nach dem Schema von Draw Line 
Unterprogramme zu schreiben, die 
Dreiecke, Quadrate oder ähnliche 
„Grafik-Makros” erzeugen, und so¬ 
gar eine CIRCLE-Routine ist bei 
geschickter Programmierung reali¬ 
sierbar - nur Ihre Phantasie setzt 
hier Grenzen! 

Abschließend noch ein paar Erläute¬ 
rungen zu dem Lissajous-Programm, 
das die neuenvorbenen Grafikfä¬ 
higkeiten des Joyce in voller Pracht 
demonstriert. Lissajous-Figuren ent¬ 
stehen durch die Überlagerung 
zweier Schwingungen, deren Bewe¬ 
gungsrichtungen senkrecht zueinan¬ 
der verlaufen. Nach dem Programm¬ 
start werden zunächst durch zwei 
Eingaben die Schwingungsperioden 
bestimmt; danach wird durch eine 
weitere Eingabe entschieden, auf wel¬ 
che Weise die Grafik gestaltet werden 
soll: 

- N erzeugt die normale Lissajous- 
Kurve als Linienzug. Da einige Kur¬ 
ven in sich selbst zurücklaufen, 
kann es zeitweilig so aussehen. als 
wäre das Programm untätig - in 
diesem Fall bitte etwas Geduld! 

- P verbindet die Punkte der Lissa- 
jous-Kurve in regelmäßigen Inter¬ 
vallen mit dem Bildschirm-Mittel¬ 
punkt durch Linien. 

- L funktioniert wie P, nur wird das 
Zentrum während des Zeichnens 
auf einer Linie hin und her bew'egt. 

- K bewegt das Zentrum der Grafik 
auf einer Kreislinie. 

Nachdem das Programm fertig ist, 
können Sie eine beliebige Taste 
drücken und Werte für eine neue 
Grafik eingeben. 

Damit genug für dieses Mal - in der 
nächsten Ausgabe von PC Interna¬ 
tional werden wir noch weitere 
Funktionen vorstellen, mit denen 
sich der brave Bürocomputer Joyce 
endgültig in eine heiße Grafikmaschine 
verwandelt. Wer es bis dahin vor 
Neugier nicht mehr aushält, sollte 
einen Blick in die zweite Ausgabe von 
„PASCAL International” riskieren: 
Dort finden Sie eine detaillierte GSX- 
Dokumentation mit vielen Pascal- 
Prozeduren, die sich - soweit die 
Funktionen von den Joyce-Treiber¬ 
programmen unterstützt werden - 
ohne Probleme in BASIC umschrei¬ 
ben lassen. 

(M. Schlöter/M. Uphoff) 
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10 '*******»«-* GSX-Pemo Lissajous-Grafiken 
20 GOSUB 50000:REM Init GSX 
30 cls$=CHR$ (27)+"E”+CHR$ <27) +"H" 

40 con$=CHR$ <27)+"e":coff$=CHR4 (27)+*'f":statusoff* 
=CHR$(27)+"0" 

50 PRINT clsS;conS;statusoff 
60 pl=3.1415926# 

70 INPUT"X-Periode (1..10): ", xp 
60 INPUT”Y-Periode (1..10): ",yp 

90 INPUT"Ausfuehrung (N/P/L/K): ",a$:a$=UPPER$(a$) 
100 FOR k=10 TO 1 STEP -1 

110 IF INT(xp/k)=xp/k AND INT(yp/k)=yp/k THEN xyp= 
x P*yP / k:GOTO 130 
120 NEXT k 

130 PRINT clsS;coff$; 

140 x2=32000:y2=16000 

150 FOR w=0 TO 2*pi*xyp STEP pl/30 

160 IF a$="N" THEN xl=x2:yl=y2 

170 IF a$="P" THEN xl=16000:yl=16000 

180 IF a$=’’L" THEN xl=8000»CQS(w)+16000: yl=16000 

190 IF a$="K" THEN xl=8000*COS(w)+16000: yl=8000*SI 

N <w)+16000 

200 x2=16000»COS(w/xp)+16000:y2=16000*SIN(w/yp)+16 
000 

210 GOSUB 10000:REM Draw Line 
220 NEXT w 

230 WHILE INKEY*="”:VEND 
240 GOTO 50 
250 ' 

10000 ’********** Draw Line 
10010 contrl%(l)=6:contrl%(2)=2 

10020 ptsin%(1)=xl:ptsin%(2)=yl:ptsin%(3)=x2: ptsin 
%(4)=y2 

10030 GOSUB 60000:RETURN 
10040 ’ 

50000 *********** Init GSX 

50010 DIM pb%(5),contrl%(10),intin%<255),ptsin«(10 
0),intout%(45),ptsaut%(100) 

50020 gdos%=&HBDF0:MEMORY gdos%-l 

50030 POKE gdos%,14;POKE gdos%+l,115:REM ld c,115 
50040 POKE gdos%+2,195:POKE gdos%+3,5:POKE gdos%+4 
,0:REM jp 0005 

50050 device%=l:GOSUB 50080:REM Open Workstation < 
Screen) 

50060 RETURN 
50070 ' 

50080 ’♦+♦******» Open Workstation 
50090 GOSUB 50170:REM Close Workstation 
50100 contrl%(l)=l:contrl%(2)=0:contrl%(4)=10 
50110 1ntin% <1)=device% 

50120 RESTORE 50150 

50130 FOR 1=2 TO 10:READ intin%<i):NEXT 
50140 GOSUB 60000:RETURN 
50150 DATA 1,1,1,1,1,1,2,6,1 
50160 ’ 

50170 '**♦***♦*♦« Close Workstation 
50180 contrl% <1)=2:contrl%(2)=0 
50190 GOSUB 60000:RETURN 
50200 ’ 

60000 ‘********** GDOS-Aufruf 
60010 pb% <1)=UNT (VARPTR(contrl% <1))) 

60020 pb% <2)=UNT<VARPTR(intin%(1))) 

60030 pb%<3)=UNT(VARPTR<ptsin%<l))> 

60040 pb%<4)=UNT(VARPTR(intout%(1))> 

60050 pb%(5)=UNT(VARPTR<ptsout%<l))) 

60060 CALL gdos%(gdos%,pb%(1)) 

60070 RETURN 
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Ein Oldtimer in Aktion 

Tips für ED.COM 

Der zeilenorientierte Editor ED.COM 
in CP/M ist altmodisch und unergono¬ 
misch, aber manchmal kommt man um 
seine Benutzung doch nicht herum. Da¬ 
her folgen hier einige Hinweise zu sei¬ 
ner Bedienung. 

Wer mit dem Joyce Textdateien bear¬ 
beiten will, erhält schon mit der Stan¬ 
dardsoftware drei Programme zu die¬ 
sem Zweck (sogenannte Editoren): 
die Textverarbeitungssoftware Loeo- 
Script erfüllt hauptsächlich diese 
Funktion, unter CP/M stehen ferner 
der Full-Screen-Editor RPED und 
der "Software-Klassiker” ED.COM 
zur Auswahl (daneben enthalten 
auch die Programmiersysteme Basic 
und Logo jeweils einen zeilen- bzw. 
bildschirmorientierten Editor!) Der 
Benutzer hat also die Qual der 
Wahl. 

Texte, die lediglich ausgedruckt wer¬ 
den sollen, wird man natürlich am 
ehesten mit dem komfortablen 
LocoScript bearbeiten. Die mit die¬ 
sem Programm erstellten Dateien ha¬ 
ben allerdings ein ungewöhnliches 
Aufzeichnungsformat (z.B. für Leer¬ 
stellen - "Blanks” - und Bindestriche), 
das als Eingabe für CP/M-Programme 
zu Mißverständnissen führt. Damit 
scheidet LocoScript für die Erstel¬ 
lung von z.B. Assembler-Programmen 
aus. (Letzte Meldung: In der neuen 
Version 1.21 von LocoScript können 
inzwischen auch ASCII-Dateien er¬ 
stellt werden. Für die Programm¬ 
entwicklung bedeutet dies aber, daß 
zwischen LocoScript und CP/M je¬ 
weils hin- und hergebootet werden 
muß). 

Als nächster Kandidat wird in sol¬ 
chen Fällen vom Schneider-Hand¬ 
buch der Basic-Editor RPED emp¬ 
fohlen. Es ist ein recht komfortables 
Programm, das ähnlich wie Loco¬ 
Script das Editieren von Dateien auf 
dem ganzen Bildschirm ("full 
screen”) erlaubt. Der Pferdefuß ist je¬ 
doch: Dateien mit mehr als 200 Zei¬ 
len können nicht korrekt bearbeitet 
werden. Beim Aufruf des Programms 
wird man darauf auch hingewiesen. 

Steigt (durch Einfügen von Zeilen) 
die Länge einer Datei jedoch 
während der Bearbeitung auf über 
200 Zeilen, so wird als "Rache" am 
Ende der Datei die entsprechende 
Zahl von Zeilen abgeschnitten, und 
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dies geschieht leider sogar ohne Hin¬ 
weis oder Warnung! 

Für längere Dateien wie z.B. eine 
Makro-Bibliothek für den Assembler 
MAC kann also auch RPED nicht 
verwendet werden. 

Bleibt also der ungeliebte ED.COM, 
ein zeilenorientierter Editor, wie es 
ihn seit den Teletype-Zeiten auf allen 
Rechenanlagen, ob groß oder klein, 
gibt. In seiner CP/M-Version auf dem 
Joyce ist er zur Bearbeitung beliebig 
großer Dateien geeignet, da auch je¬ 
weils nurTeile der Quelldatei gelesen, 
bearbeitet und in die Zieldatei ge¬ 
schrieben werden können. Bis zu 
einer Größe von ca. 40 KB ist eine sol¬ 
che Teilung jedoch nicht erforder¬ 
lich. 

Hinweise zur Benutzung des ED fin¬ 
den sich im Joyce-Handbuch (kurz 
"Schneider") Band 1: CP/M, Seiten 
2.9f. und 5.38ff., sie sind jedoch leider 
nicht vollständig und sollen daher 
hier ergänzt werden (als Quellen 
dienten: die ebenfalls mit dem Joyce 
mitgelieferte Datei HELP.HLP, 
sowie eigene Versuche). 

Zu der Anweisung I bzw. i (Insert - 
Einfügen) mit sofort anschließendem 
String wäre nachzutragen, daß ein 
Control-Z am Ende des Strings nicht 
unbedingt erforderlich ist - RE¬ 
TURN tut's ebenso und wird auch 
gleich in die Datei als Zeilenende 
übernommen. 

Ganz undokumentiert bei Schneider 
ist die Anweisung J (Juxtapose - Ge¬ 
genüberstellen) in der Form J such- 
string 1 Zneustring } Zlöschziel. 

Damit kann ab der aktuellen Zeiger¬ 
position die Zeichenfolge suchstring 
gesucht, direkt hinter ihr die Zeichen¬ 
folge neustring eingefügt und oben¬ 
drein der bestehende Zeileninhalt bis 
zu der Zeichenfolge löschziel aus¬ 
schließlich gelöscht werden: ein 
mächtiger Befehl, für den mir aller¬ 
dings noch keine Anwendungsbei¬ 
spiele eingefallen sind. 

Die Eingabe einer Zahl bewegt den 
Zeiger um entsprechend viele Zeilen 
vor bzw. zurück und zeigt die neu 
positionierte Zeile. 

Nicht dokumentiert ist, daß RE¬ 
TURN ohne alles ebenfalls um eine 
Zeile vorrückt. Dies ist ganz bequem, 
um sich langsam durch eine Datei 
zu arbeiten. 

Die Eingabe einer Zahl, gefolgt von 
einem Doppelpunkt (z.B. 47:), posi¬ 
tioniert auf die Zeile mit dieser Num¬ 
mer und zeigt sie an, falls vorhanden. 
Direkt auf den Doppelpunkt können 
weitere Kommandos folgen. Haben 
wir z.B. in der seitenweisen Aufli¬ 


stung mit P einen Fehler in Zeile 11 
entdeckt, so können wir mit 
ll:SfalschtZrichtig 
die Zeile anwählen und zugleich die 
Korrektur veranlassen. (JZ wird am 
einfachsten mit der Taste fl eingege¬ 
ben). Werden beim zeilen weisen Kor¬ 
rigieren Zeilen gelöscht oder neue 
eingefügt, so ändern sich übrigens alle 
nachfolgenden Zeilennummern. Um 
Irrtümer bei der Positionierung zu 
vermeiden, sollte man solche Bear¬ 
beitungen in der Reihenfolge von 
hinten nach vorn vornehmen. 

Der Befehl P ist bei Schneider falsch 
dokumentiert: mit nP werden nicht 
etwa die nächsten n Zeilen angezeigt, 
sondern der Befehl P «-mal wieder¬ 
holt. P steht w r ohl für Page, denn es 
wird jeweils eine ganze Bildschirm¬ 
seite (30 Zeilen) angezeigt. Davor 
wird die aktuelle Zeilennummer um 
30 erhöht. Steht der Zeiger auf Zeile 1, 
so zeigt P die Zeilen 31 - 60 an, und 
der Zeiger steht anschließend auf 31. 
Beim nächsten P-Aufruf kommen die 
Zeilen 61-90 usw. Um die erste 
"Seite” sehen zu können, muß die 
Form -P (um 30 Zeilen zurücksetzen, 
nächste 30 Zeilen zeigen) verwendet 
werden. 

Dies klingt kompliziert, aber man 
kann sich daran gewöhnen. Ich ver¬ 
wende immer #a-p(#a: Datei in Puf¬ 
fer einiesen) als ersten Befehl nach 
dem Aufruf von ED. 

Der Befehl Q "verläßt den ED-Modus 
und kehrt zu CP/M zurück" (schreibt 
Schneider) - allerdings unter Ignorie¬ 
rung aller vorgenommenen Änderun¬ 
gen! Diesen Befehl wird man verwen¬ 
den. wenn man entweder soviel Mist 
gebaut hat, daß man lieber noch ein¬ 
mal von vorne anfängt, oder wenn 
man keine Änderungen vorgenom¬ 
men hat (das spart Zeit und 
Diskettenzugriffe). 

Die Befehle R (Text von Datei lesen; 
übrigens nicht ans Ende des Puffers, 
wie das Handbuch vermuten läßt, 
sondern an die aktuelle Zeigerpo¬ 
sition) und X (Text in Datei schrei¬ 
ben) können auch ohne Angabe eines 
Dateinamens verwendet werden, in 
diesem Fall wird der Standardname 
X$$$$$$$.LIB verwendet. Damit 
steht ein Editierpuffer zur Verfügung, 
der zum Duplizieren und Versetzen 
von Abschnitten verwendet werden 
kann. 

Mit OXname kann eine solche Hilfs¬ 
datei (aber auch jede andere Datei) 
gelöscht werden - dies kann 
notwendig werden, w r enn der Platz 
auf der Diskette zu knapp zum 
Zurückschreiben wird. 

Fortsetzung auf Seite 87. 
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Undokumentiert bei Schneider sind 
weiter die Befehle U (alle eingegebe¬ 
nen Kleinbuchstaben in Großbuch¬ 
staben umwandeln) und -U (Aufhe¬ 
ben des vorigen Befehls) sowie V 
(Zeilennumerierung einschalten. 
Standard), -V (ausschalten) und OV 
(verfügbaren und belegten Textpuffer 
in Bytes anzeigen - extrem nützlich 
zur Abschätzung der Filegröße!) 

Ein letzter Befehl für Geduldige: nZ 
läßt das Programm n Sekunden lang 
Stillstehen und warten. Anschließend 
kann das nächste Kommando einge¬ 
geben werden. Diese Anweisung wird 
man vielleicht in Befehlsschleifen 
(«M...) verwenden, in denen eine Be¬ 
fehlsfolge mehrmals wiederholt wird, 
um eine Pause zur Betrachtung (und 
zum Abbrechen mit STOP, falls 
nötig) zu haben. 

(Richard Suchenwirth) 

HIERMIT und 
Akustikkoppler 

Eine Alternative zu MAIL232. 

Das DFÜ-Programm KERMIT läßt 
sich nicht nur, wie in CPC 7/86 be¬ 
schrieben, zur direkten Kommuni¬ 
kation zwischen zwei Rechnern be¬ 
nutzen, sondern ist auch „akustik¬ 
kopplertauglich" 

So wird's gemacht: 

Mit SETSIO oder DEVICE die 
Schnittstelle auf den Partner/die 
Mailbox abstimmen und KERMIT 
starten. 

Durch die Eingabe von ’CONNECT' 
ist KERMIT jetzt im ’Mailbox'- 
Modus, der mit ’< ALT+Ö> C wieder 
verlassen werden kann. (Ich nehme 
an, daß Sie als alter Hacker wissen, 
wie es weitergeht...) 

Falls der Übertragungspartner kein 
Echo sendet, muß (kann!) vor der 
Eingabe von ’CONNECT’noch mit 
’SET LOCAL ON' ein Pseudo-Echo 
erzeugt werden. Zwar erfährt man auf 
diese Weise nicht, was der Partner 
wirklich empfängt, aber immerhin 
braucht man nicht mehr blind zu tip¬ 
pen wie unter MAIL232. 

Ein Protokoll seiner Kontakte kann 
man mit der Option 'LOG' erhalten: 
vor der Eingabe von 'CONNECT' 
kann die Sitzung mit 'LOG d:filena- 
me.typ’ auf dem Laufwerk d: im File 
’filename.typ’ protokolliert werden. 
(Aus Geschwindigkeitsgründen ist 
als Laufwerk die RAM-Disk zu emp¬ 


fehlen, aber das Absichem nicht ver¬ 
gessen!!!) Das Protokoll wird beim 
Verlassen des Mailbox-Modus auto¬ 
matisch abgeschlossen. Somit ist 
auch der Empfang von Textfiles mög¬ 
lich, die endgültige Version muß je¬ 
doch durch eine Überarbeitung des 
Protokolls mit einem Editor gewon¬ 
nen werden. 

Mit TRANSMIT d:filename.typ’ 
können auch Textfiles abgeschickt 
werden, allerdings nur manuell: 
Tippen Sie TRANSMIT d:filename. 
typ' und KERMIT gibt Ihnen eine 
Kurzanleitung aus. 

Drücken Sie eine beliebige Taste und 
die erste Zeile des Textes wird gesen¬ 
det. Von nun an immer <ALT+J> 
<ALT+M><ALT+M> drücken, 
und der Text wird Zeile für Zeile ge¬ 
sendet. (Praktischerweise sollte man 
sich diese Zeichenfolge (fJIMTM) 
mit SETKEYS auf eine Taste, z.B. 
Cursor abwärts, legen.) 

Und wenn man schon beim Tasten¬ 
definieren ist, sollte man die ’<DEL- 
Taste noch mit <ALT+H> (TH) be¬ 
legen, da KERMIT diesen Werl für 
das Löschen der Eingabe erwartet. 
Weiterhin sollte man sich die 
Möglichkeit schaffen, wahlweise CR 
oder CR LF zu senden. 

Was es damit auf sich hat? 

Sie werden sich vielleicht schon ge¬ 
fragt haben, warum KERMIT oder 
MAIL232 beim Drücken von EN¬ 
TER oder RETURN zwar an den 
Zeilenanfang, nicht jedoch in eine 
neue Zeile springen. Der Grund 
dafür ist. daß beim Drücken von 
RETURN/ENTER nur der Code CR 
(Carriage Return, Wagenrücklauf 
zum Anfang der Zeile) erzeugt wird, 
manche Rechner (z.B. der Joyce) aber 
zusätzlich noch das Steuerzeichen 
LF (Line Feed, Zeilenvorschub) be¬ 
nötigen, um in die nächste Zeile zu 
gelangen. Das Problem läßt sich auf 
zwei Arten lösen: 

Einmal kann man in Zukunft statt 
RETURN/ENTER die Tastenfolge 
<ALT+M><ALT+J> (= <CR> 
<LF>) drücken, oder man definiert 
die ENTER-Taste auf die Codefolge 
' t M t J' um und erspart sich einige ver¬ 
renkte Finger. (Jetzt wird auch die Art 
der manuellen Übertragung bei 
TRANSMIT klar, oder?) 

Was KERMIT halt leider nicht kann, 
ist die komfortable Parametereinstel¬ 
lung, wie sie MAIL232 bietet, die 
Echo-Möglichkeit ist aber dennoch 
nicht zu verachten. 

Viel Vergnügen beim Experimentieren! 

(Michael Anton) 


Joyce & Mallard- 
BASIC 

Ein neuer Zeileneditor. 

Größere Änderungen an einem BA- 
SlC-Programm sind durch den wenig 
komfortablen Zeileneditor von Mal- 
lard-BASIC schon ein rechter Streß, 
da nach dem Editieren einer Zeile 
immer wieder die nächste Zeile mit 
"EDTT xxx" aufgeiufen werden muß. 
Eine praktischere Editiermöglichkeit 
wie z.B. "CTRLX = beenden und fol¬ 
gende Zeile editieren" gibt es leider 
nicht (oder ist zumindest nicht im 
Handbuch zu finden). 

Abhilfe schafft hier zunächst wohl 
nur die Verwendung eines ordentli¬ 
chen Editors wie z.B. Wordstar oder 
der Editor von Turbo Pascal, hier 
dürfte aber das dauernde Disketten¬ 
wechseln mit der Zeit nerven. 

Doch es geht auch innerhalb von 
Mallard-BASIC, und zwar wie folgt: 

1: BASIC und das zu editierende 
Programm laden. 

2: Das Programm fortlaufend num¬ 
merieren: 

>RENUM (ohne Optionen) 

3: Den „neuen" Zeileneditor starten: 

>AUTÜ (ohne Optionen)!!! 

Ab jetzt werden die Zeilen, ange¬ 
fangen bei der ersten, angezeigt 
und können wie gewohnt editiert 
werden. Nach dem Drücken von 
RETURN wird die Änderung über¬ 
nommen und die nächste Pro¬ 
grammzeile zum Editieren freige¬ 
geben. Soll nichts geändert werden, 
wird nur RETURN eingegeben. 

4: Der Editmodus wird mit STOP oder 
ALT+C abgebrochen. 

Zwar ist z.B. das Editieren der voran¬ 
gegangenen Zeile nicht möglich, aber 
immerhin spart man sich einige 
"EDIT’s”. 

Übersehene Zeilen können durch 
Verlassen des Editors mit STOP / 
ALT+C und dem Neustart mit 
AUTO [zeilennummer] wieder geholt 
werden. 

Das Programmende erkennt man da¬ 
ran, daß nur noch Zeilennummern 
ohne Inhalt angezeigt werden, hier 
muß man mit STOP / ALT+C 
abbrechen. 

(Michael Anton) 
12 ’86 CPC 87 


i 




I Professional Computing 


CP/M unter 
LocoScript 

„Was soll den die Überschrift?”, wer¬ 
den Sie sich bestimmt fragen, aber le¬ 
sen Sie ruhig weiter. 

Nehmen wir einmal an, Sie haben 
einen Text mit LocoScript verfaßt 
und wollen in diesen Text bei¬ 
spielsweise das Inhaltsverzeichnis 
einer Diskette einbauen. 

Wie machen Sie das? Schreiben Sie 
das Directory vom Bildschirm ab 
oder kleben Sie eine Hardcopy an die 
entsprechende Stelle? Es geht aber 
viel sauberer! 

Die Rettung bringt in diesem Falle 
ein unscheinbares CP/M-Utility na¬ 
mens PUT.COM, welches auf Ihrer 
zweiten Systemdiskette ein Schatten¬ 
dasein führt. 

Es dient im wesentlichen dazu, 
Bildschirmausgaben auf die ver¬ 
schiedenen Ausgabegeräte umzulei¬ 
ten, z.B. auch auf Diskette. (Das Ge¬ 
genstück dazu ist GET.COM, es er¬ 
möglicht z.B. das Lesen von 
Eingabedaten von der Diskette.) 


Doch holen wir es aus seinem 
Dornröschenschlaf: Kopieren Sie 
folgende Programme auf die RAM- 
Disk: 

PIP.COM, PUT.COM, DIR.COM. 

Geben Sie jetzt folgendes ein: 

M:PUT CONSOLE OUTPUT TO 
FILE M:filename.typ[SYSTEM] 

Von nun an wird alles, was auf dem 
Bildschirm erscheint, auch im 
Textfile ’filename.typ' auf der RAM- 
Disk abgelegt. Legen Sie jetzt zum Bei¬ 
spiel Ihre Disketten ein und lassen 
sich mit M:DIR[ALL] das Directory 
anzeigen. Wenn Sie alles erledigt ha¬ 
ben, beenden Sie das Protokoll mit 
M:PUT CONSOLE OUTPUT TO 
CONSOLE. Das Protokoll wird auto¬ 
matisch abgeschlossen. Sie können 
es sich jetzt mit TYPE anschauen. 

Wichtig ist, daß Sie das Protokolllile 
von der RAM-Disk mit PIP auf Ihre 
LocoScript-Diskette kopieren, da es 
sonst spätestens beim Laden von 
LocoScript verloren ist. 

Laden Sie jetzt LocoScript und erstel¬ 
len oder bearbeiten Sie den Text, in 


den das Directory integriert werden 
soll. 

An der entsprechenden Stelle fügen 
Sie mit der Option ’-f7- / Text einfü- 
gen' das eben erstellte File Tilename.- 
typ’ ein. Stellen Sie bitte vorher die 
Zeilendichte auf 15 Z/Zoll oder klei¬ 
ner ein, um eine originale Wieder¬ 
gabe ohne Zwangsumbruch zu 
erhalten. 

Sobald das Protokoll eingefügt ist, 
können Sie mit AUSBL usw. die 
notwendigen kosmetischen Opera¬ 
tionen durchführen. Beim Aus¬ 
drucken des Textes haben Sie dann 
die gewünschten Informationen sau¬ 
ber im Text integriert. 

Auf diese Weise können auch ganze 
Ablaufprotokolle unter CP/M sauber 
dokumentiert werden (jetzt wird die 
Überschrift verständlich, oder?). 

Allerdings ist dabei zu beachten, daß 
Steuerzeichen wie Bildschirm löschen 
oder inverse Darstellung nicht darge¬ 
stellt werden und manchmal zu 
seltsamen Effekten führen. 

Auch ist zu berücksichtigen, daß 
manche Programme, wie z.B. dBase 


tupeh'Votieite 

bietet unsere neue 3.5” Diskettenstation, anschluß¬ 
fertig mit Kabel an den CPC-6128 

• geringer Preis (inklusive Kabel!) 399 ,- 
#10 Disketten MF 1 DD nur 39,“ 

1 ititir rrtrf 

• Epson 2x40 Track Standardlauf¬ 
werk. Kann bei Systemwechsel 
z.B. an Schneider PC ange¬ 
schlossen werden (360 KB). 

180 KB mit CPC-6128. 

Drucker mit Kabel 

Star NL-10 798,- Citizen 120 D 610,- 
Microscan Typenraddrucker (typgleich SD-15) 675,- 

20 MB Harddisk-Drivecard 1498 - 

Qualitätsprodukt eines führenden Herstellers, 
nur 11 Watt Stromaufnahme. Einfach zu installieren. 
Wir führen das komplette Schneiderprogramm. 

CPC 6128, Joyce und PC stehen vorführbereit in un¬ 
seren Räumen. Wir sind Schneider Vertragshändler. 

Schüngel Datentechnik GmbH 

Meckenheimer Allee73.5300Bonn,Tel. (0228) 659077.Tx. 885772 schdtd 



flPOS TeHtprogrann 


flPOS Textprograwt VI * 
Einfügen # Spalte 1* Zeile 


* i 1986 by Aurel Jahn, 6188 DA 
1 * 23 Zeilen * FRE 6681 * Text i DEMOBILD 


* Fetter bzu. unterstrich e ner Text wird auf den Bildsctyirn fett bzw, 
unterstrichen daraesteilt! Der linke Rand ist natürlich auch zu sehen, 

<* 

Kurz 


Das APÖS Textprogram nacht endlich Schluss Mit dem Schattenbcxen! 

Arbeitet in Einfüge-Modus ( = Insert ), ( Hierdurch sind 
Funktionen wie "Zeile einfügen" oder "Marge Text" nicht nötig. )<* 
Automatischer Hortumbruch ( = Word wrap = Fließtext ) «* 
Blockoperationen wortweise <* 

Gelöschte Zeichen und Texte können wieder herjestellt werdend 
Tastenbelegung, Bildschirmfarbe, verwendeter Drucker etc, werden 
von Diskette Lbzw CassetteJ gelesen.«* 

Deutsche Zeichen : § Ä ü ö ä ü ö ß § Ä Ö ii a o ü ft«* 

Sonderzeichen :[]<)_01p° A \lifP 

Die französischen Zeichen : H4ä§Hiioüuoe«* 

Als Steuerzeichen werden spezielle Zeichen verwendet: = I 0 *«* 
Hardwarezusätze sind kein Hindernis wenn :«* 

* SYMBOL AFTER 23 : Möglich, und danach HIMEM ) 36880 ist,«* 

< die Wirkung dieser Zusätze Muß evtl, abgeschaltet werden, )«* 
Texte der Cassettenversion sind Mit der Diskettenversion ladbar,** 
Sie können selbstgeschriebene Erweiterungen einbinden! <* 

Dieses ist übrigens ein Hardcopy vom Bildschirm! «* 


* 

464 C 

Cassettenprograum ( nur für 

CPC 464 ) 

70.00 

OH 

*■ 

464 0 

Di skettenprogranun 3" ( nur für 

CPC 464 ) 

80.00 

OH 

* 

664 

Diskettenprogramm 3" ( für CPC 664 läuft 

auch auf CPC 6128, nutzt aber nur 64 K ) 

80.00 

OH 

* 

kommentiertes listing mit Hinweisen zum 
von Zusätzen ( alle Versionen ) 

einbinden 

40.00 

DH 

ln 

Kürze 

1iefertar: 




* 

6128 

Di skettenprogranun 3 11 ( nur für 

rutzt 128 K 5yte ) 

CPC 6128 

90.00 

OH 


Alle Preise sind Endpreise inclusive MwSt, Porto und Verpackung. 


Bestellungen : 

* gegen Vorausrechriung, 

- per Nachnahme oder mit 
’ Verrechnungs Scheck. 
Händleranfragen erwünscht 


Aurel Jahn 
Dat:ent:echni k 

Heinheimer Straße 20 
6 100 Darmstadt 
Tel 06151—718B17 
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II, bei Eingaben ein Echo senden, 
und das ssiieehhtt iimm PPrroot- 
tookkoollll eettwwaass kkoom- 
miisscchh aauuss, läßt sich aber lei¬ 
der nicht vermeiden. 

(Michael Anton) 

(Die eckigen Klammern entsprechen 
Ä und Ü. Anm. d. Redaktion) 

Aufschlußreicher 
Monolog - 

Tester für serielle 
Schnittstelle 

Da hat man nun viel Zeit und Geld in 
Kabel und Akustikkoppler investiert 
und dann stellt sich heraus, daß es mit 
der Verbindung doch nicht klappt... 
Nach eingehender Prüfung lautet der 
Befund, daß eingestellte Parameter 
der Schnittstelle sowie Kabel und 
Modem in Ordnung sind, der Fehler 
ist also an der seriellen Schnittstelle 
zu suchen. 


Mit dem vorliegenden Hard- und Soft¬ 
ware-.,PakeF kann man sich endgültig 
Klarheit über den Zustand seiner 
seriellen Schnittstelle verschaffen. 
Der „harte" Teil des Pakets besteht 
aus einem schnell und billig herzu¬ 
stellenden Dummy-Stecker für die 
Schnittstellenbuchse. 

Durch eine entsprechende Verdrah¬ 
tung wird der Computer dazu ge¬ 
bracht, mit sich selbst zu kommuni¬ 
zieren. Dazu werden die Ein- und 
Ausgänge für Daten (RXD-TXD), 


Handshake (CTS-RTS) und sonstige 
Signale (DSR-DCD-DTR) miteinan¬ 
der verbunden. 

Bild 1 zeigt die entsprechende Ver¬ 
drahtung für die Schnittstelle des 
Joyce. 

Die Herstellung des Dummys ist kein 
Problem, wir befestigen lediglich eine 
25-polige SUB D-Buchse (oder Stek- 
ker, je nach SIO-Anschluß), etwas 
Draht, ein Lötkolben und Lötzinn 
und, für die Ästheten unter den Bast- 


25 pol SUB D Buchse / Blick auf 

Lötseite 

2 3 4 5 6 8 


! 1 1 1 1 I 

-1 -! - ! -1 - !-1- 

\(j (?) <j) 0 ij) (*> («) <5 S) (*) 0 @ gl / 
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\<j) (j) (j) <« (!) (j) 1« f« (£) (£) («) W / 
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Bild 1 
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lern, noch ein passendes Steckerge¬ 
häuse, alles für ca. 15,- DM zu 
haben. 

Für die Verdrahtung brauchen wir 
kein CAD-System: Eine Drahtbrücke 
zwischen Pin 2 und 3, eine zwischen 
Pin 4 und 5 und eine Verbindung zwi¬ 
schen den Pins 6, 8 und 20 - und die 
Sache ist fertig. 

Noch eine kurze Kontrolle auf 
Fehlverbindungen (die Schnittstel¬ 
lentreiber sind ja angeblich kurz¬ 
schlußfest, aber eine Verbindung mit 
dem Massepin 7 ist trotzdem unange¬ 
nehm!), und dann kann der Stecker 
schon in das Gehäuse geschraubt 
werden...FERTIG. 

Und nun zur Software: 

Im Prinzip kann zum weiteren Test 
jedes Terminalprogramm verwendet 
werden, welches die Eingaben nicht 
direkt, sondern als Echo vom 
Übertragungspartner ausgibt. Solche 
Programme erkennt man daran, daß 
Tastendrücke ohne angeschlossenes 


Modem zu keiner Reaktion führen. 
Stecken Sie jetzt den Dummy auf, 
dann erscheinen die Eingaben auch 
auf dem Bildschirm. 

Ist dem aber nicht so, und die Para¬ 
meter sind richtig eingestellt, dann 
können Sie schonmal nach den Ga¬ 
rantiebestimmungen für Ihre Schnitt¬ 
stelle suchen, denn die dürfte in 
einem solchen Falle kaputt sein. 
(Was zu beweisen war.) 

Steht kein geeignetes Programm zur 
Verfügung, dann hilft das Programm 
CHECKSIO.COM, dessen Assem- 
blerlisting Sie in Bild 2 sehen. 
CHECKSIO zeigt sowohl die Ein¬ 
gabe als auch das empfangene Zei¬ 
chen an und kann mit 'ALT/CTRL C ! 
oder ’EXIT/ ESC’ abgebrochen wer¬ 
den. Geben Sie es als CHECK- 
SIO.ASM mit einem Texteditor ein 
und assemblieren/linken es dann mit 
MAC/HEXCOM oder ASM/LOAD. 
Joyce-Anwender können sich die 
Tipparbeit eventuell sparen, denn 
sowohl MAIL232 als auch KERMIT 


erfüllen die nötigen Anforderungen. 
(MAIL232 ist gleich nach dem Start 
im passenden Modus, bei KERMIT 
wird der ’Mailboxmodus’ durch Ein¬ 
gabe von CONNECT gestartet.) 
Verspielte Leute können ja auch mal 
Fehler simulieren, z.B. wie es aus¬ 
sieht, wenn Sender und Empfänger 
mit verschiedenen Baudraten arbeiten 
oder was bei fünf Datenbits noch 
durchkommt usw. 

Der Dummy-Stecker hat aber auch 
noch einige praktische Nebenzwecke: 
Mit ihm können z.B. eigene DFÜ- 
Programme ohne Übertragungs¬ 
partner getestet werden. 

Und wenn die Schnittstelle mal verse¬ 
hentlich ohne ,Abnehmer' ange¬ 
sprochen wird, so hängt sich das 
Programm auch nicht mehr beim 
Warten auf die Empfangsbestätigung 
auf (was natürlich nicht heißt, daß 
nicht irgendwelche Eingabepuffer 
einmal überlaufen können...) 

(Michael Anton) 


***************«*****-*■**•*******»•****■****•» 

* CHECKSIO V 1.1 - SCHNITTSTELLENTEST * 

* 1986 BY MICHAEL ANTON * 

* HERMANN ESSIG STR 106 * 

* 7141 SCHWIEBERDINGEN * 

* 07150/31576 * 

**************«***#*****•*#********#***•*■#•# 

(DUMMY-STECKER NICHT VERGESSEN...> 


ORG 100H 
BDOS EQU 5 
CCP EQU 0 


;-INITIALISIERUNG- 

MVI C,9 
LXI D,TI 
CALL BDOS 
MVI C, 9 
LXI D,T2 
CALL BDOS 
MVI C,9 
LXI D,T3 
CALL BDOS 
MVI C,9 
LXI D,Ml 
CALL BDOS 


;-SCHLEIFE- 

L1 MVI C,7 ; ZEICHEN VON AUX: ? 
CALL BDOS ' 

CPI OFFH ; VENN JA, 

CZ HOL ; DANN LESEN UND AUSGEBEN 

MVI C,ll ; ZEICHEN VON CON: ? 

CALL BDOS 

CPI 01H ; WENN JA, 

CZ GIB ; DANN LESEN UND SENDEN 
JMP LI 


; - UP AUX: -> CON: - 

HOL MVI C, 9 
LXI D,K2 
CALL BDOS 


MVI C,3 
CALL BDOS 
MOV E,A 
MVI C,2 
CALL BDOS 
MVI C,9 
LXi D,M3 
CALL BDOS 
RET 


;-UP CON: -> AUX: - 

GIB MVI C,1 
CALL BDOS 

CPI 1BH ; VENN <EXIT> 

JZ AUS 

CPI 03H ; ODER <ALT+C> 

JZ AUS ; DANN PROGRAMM BEENDEN 

MOV E,A 

MVI C,4 

CALL BDOS 

RET 


;-ENDE- 

AUS MVI C,9 
LXI D,T3 
CALL BDOS 
MVI C, 9 
LXI D,T4 
CALL BDOS 
JMP CCP 


;-TEXTE- 

T1 DB 1BH,45H,1BH,48H ,'* CHECKSIO V 1.1 *',0DH,0AH 
; ERSTE 4 BYTES VON TI = 'BILDSCHIRM LOESCHEN' 

T2 DB ODH, OAH, •' <<EXIT> = ENDE)*' 

T3 DB ODH,OAH,OAH,' 

T4 DB 'ENDE DES TESTS...S' 

Ml DB '<*' 

M2 DB 

K3 DB '> <i‘ 


END 
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Adieu den Zeiten, in denen die Hard¬ 
ware der Software um Generationen 
voraus war. Adieu auch den Zeiten, in 
denen kostbare Zeit vor dem PC ver¬ 
trödelt wurde, anstatt ihn das tun zu 
lassen, wofür er angeschafft wurde: 
Geld zu verdienen. Und adieu den 
Zeiten, in denen nach dem Kauf der 
Hardware der Software-Kosten- 
Schock kam. Jetzt gibt es IDA. Das 
komplette Geschäftssystem. Zum sa¬ 
genhaften Preis von 949,- DM für 
den PC und alle Kompatiblen. Da 
lohnt sich nicht einmal das Raubko¬ 
pieren, weil der Service fehlt. 

IDA gibt es in drei Modulen, die über 
Software-Schnittstellen verbunden 
sind: 

- IDA FAKTURA 498,- DM 

- IDA FIBU 498,- DM 

- IDA STATISTIK 198,- DM 

- FAKTURA + FIBU 

+ STATISTIK 949,- DM 

IDA gibt es auch für den Joyce, Atari 
ST und Amiga. 


Ebenso sagenhaft wie der Preis ist der 
Leistungsumfang von IDA (Ände¬ 
rungen und Ergänzungen auf Anfra¬ 
ge): 

Stammdaten, Lagerverwaltung, 
Rechnungen, Fehl-, Bestell- und 
Preislisten, Lieferscheine, Auftrags¬ 
bestätigung, Gut- und Lastschriften, 
Verkaufskalkulation, Werbetexte, 
Mahntexte in der FAKTURA. 
Vorsteueranmeldung, Jahresab¬ 
schluß, G+V-Rechnung, variable 
Kontenrahmen und umfangreiche 
Hilfsfunktionen. Die FIBU ist für 
Steuerberater zugelassen. 

Verkaufs-, Lager- und Umsatzstati¬ 
stik, Rentabilitätsrechnung und Bi¬ 
lanzauswertung, die STATISTIK lie¬ 
fert jederzeit Entscheidungsgrundla¬ 
gen. 

IDA gibt es bei Innowave-Data, Han¬ 
nover: Coupon ausschneiden und 
einsenden oder einfach anrufen: 
(0511)13030-39. 


□ Ja, ich möchte mit IDA arbeiten. 

□ IDA FAKTURA □ IDA FIBU □ IDA STATISTIK 

Mein PC:_ 

□ Schicken Sie mir Unterlagen. 

Schicken Sie mir ein Laufwerk □ 5V 4 ” □ 3,5". 


Innowave Data 

Kurf-Schumachcr-Str 26/28 3000 Hannover 1 


Fach hä ndleranf ragen erwünscht 


Schulungen auf Anfrage. 
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Rund um den Kölner Dom spielte sich 
vom 16. bis 21, Oktober das Computer¬ 
geschehen zum Ausklang des Jahres 
1986 ab. Die Orgatechnik, einst eine 
Domäne der Büro- und Kommunika¬ 
tionstechnik, stand in fast allen Berei¬ 
chen ganz im Zeichen der EDV. 

Schon vor Beginn der Orgatechnik 
konnten die Veranstalter erfreuliches 
vermelden: rund 1700 Aussteller hat¬ 
ten für Köln gemeldet, um dem er¬ 
fahrungsgemäß sehr fachkundigen 
Publikum aus aller Welt bewährte 
und neue Produkte näherzubringen. 

So war auch erstmals der sagenum¬ 
wobene und mit großen Vorschußlor¬ 
beeren bedachte PC 1512 von Schnei¬ 
der zu sehen - Premiere zum Anfas¬ 
sen! Aber bekanntlich verursachen 
Premieren den Ausstellern immerein 
gewisses „Gribbeln” in der Magenge¬ 
gend, zumindest so lange, bis die 
Akzeptanz einzuordnen ist, bzw. die 
ersten Auftragsbücher gefüllt sind. 


Die Schneider-Verantwortlichen dürf¬ 
ten recht schnell ein wohliges Gefühl 
im Magen bekommen haben, spricht 
man doch schon kurz nach der Messe 
von ca. 30.000 verkauften Schneider 
PC 1512! 

Damit scheint sich die große Erwar¬ 
tungshaltung der gesamten Branche 
zu bestätigen; der neue Schneider- 
Computer ist ein echter Renner. 

Das überzeugende Preis-/Leistungs- 
verhältnis sowie das umfangreiche 
Hard- und Softwareangebot wurden 
von allen Seiten gelobt, zusätzlich 
bürgt der Name Schneider für Quali¬ 
tät und guten Service. Letzteres dürfte 
u.a. in Form von entsprechenden 
Fachzeitschriften gewährleistet sein 
(diese Argumente waren beim ..heim¬ 
lichen” Zuhören von Gesprächen am 
Schneider-Stand die am häufigsten 
genannten). 

Interessant ist weiterhin die Tatsache, 
daß gerade der CPC 6128 z.Z. einen 
wahren Boom erfährt. Damit steht 


dem Anwender das ideale Einsteiger¬ 
gerät zur Verfügung und bietet auch 
Fortgeschrittenen und Profis die 
nötige Grundlage, um effektiv zu ar¬ 
beiten. Der 6128 kann durchaus als 
Allround-Talent bezeichnet werden, 
die Bereiche Unterhaltung und Busi¬ 
ness werden zu etwa gleichen Teilen 
abgedeckt. 

Daß zahlreiche Laien und Einsteiger 
auch den PC 1512 in die engere Wahl 
ziehen, ist nicht weiter verwunder¬ 
lich. Moderne Technologie auf der 
Basis 16 Bit CPU, IBM-Kompatibili- 
tät, reichhaltiges Zubehör (GEM. 
Maus, Grafikkarte etc.) und der re¬ 
lativ niedrige Einstandspreis ab DM 
1999.- sind Gründe genug, bei einer 
Kaufentscheidung auch den PC 1512 
in die engere Wahl zu ziehen. 


Der Markt reagiert 


Hoffnungsvoll stimmt des weiteren 
die Tatsache, daß schon zur Premiere 
des neuen PC einiges an leistungsfä¬ 
higer Software der unteren Preisklasse 
zu begutachten war. Zu nennen wäre 
hier u.a. der Star Writer PC, ein 
Programmpaket, bestehend aus Text¬ 
verarbeitungsprogramm, Adreßver- 
waltung, Grafiksystem und DFÜ- 
Programm zum Preis von DM 298,-. 
Data Becker bringt den Textomat PC 
(DM 298.-), der ebenfalls eine Adreß- 
verwaltung beinhaltet. Beide Pro¬ 
gramme werden inzwischen einem 
umfangreichen Test unterzogen, die 
Ergebnisse können Sie in der näch¬ 
sten Ausgabe nachlesen. 

Die komplette GEM Software von 
Digital Research ist im Angebot von 
Schneider Data zu finden. 



Information vor Ort. CPC-Leser im Gespräch mit unseren Redakteuren. 
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Die Programme im Einzelnen: 

GEM Write - Textverarbeitung mit 
der Möglichkeit, Grafiken aus GEM 
Paint, GEM Draw oder anderen 
GEM Anwendungen einzufügen 
(DM 399,-). 

GEM Diary - Programmpaket beste¬ 
hend aus Terminkalender, Monats¬ 
übersicht, Wecker und Karteikasten. 
Der Clou: dieses Programm arbeitet 
im Hintergrund und ist immer auf 
Knopfdruck verfügbar (DM 149,-).' 
GEM Font Editor - ein Zeichensatz¬ 
editor mit vielen Optionen (DM 
399,-). 

GEM Word Chart - Hilfe zur Erstel¬ 
lung von Präsentationsunterlagen, 
z.B. Overheadfolien (DM 399,-). 
GEM Graph - stellt Daten als Grafi¬ 
ken dar: Kurven, Balken. Kreis¬ 
diagramme in verschiedenen Forma¬ 
ten. Symbole und Landkarten (DM 
399.-). 

GEM Draw - Mal- und Zeichenpro¬ 
gramm mit zahlreichen Optionen 
(DM 399,-). 

GEM Programmer's Toolkit - Hilfe 
zum Erstellen eigener GEM-Soft- 
ware. Beinhaltet Resource Con- 
struction Set. IKON-Editor und De¬ 
bugger (DM 650.-). 

Des weiteren sind die Programmier¬ 
sprachen Utah-Fortran und Utah- 
Cobol verfügbar (DM 189,-). 

Peter Eschenbacher, Geschäftsfüh¬ 
rer der Fa. Schneider Data, bietet 
außerdem noch zwei Programmpa¬ 
kete für komplexe Anwendungen an, 
die allein vom Preis her Maßstäbe für 
die Zukunft setzen. Delta 4 (DM 399,-) 
ist ein intelligentes Datenbankpro¬ 
gramm für diverse Anwendungen wie 
z.B. Lagerhaltung, Auftragsabwick¬ 
lung etc. Office V (DM 299,-) besteht 
aus einer Datenbank, einer Textver¬ 
arbeitung und einer Tabellenkalku¬ 


lation für den kommerziellen Ein¬ 
satz. 

Alle hier aufgeführten Programme 
werden in Kürze ausführlich vorge¬ 
stellt. 

Ebenfalls von Schneider Data, 
kommt der Typenraddracker SD-15 i 
(inkl. IBM-Zeichensatz) für den PC 
1512. Der Preis liegt bei etwa DM 
748,-. 

Anhand dieser, bei weitem nicht voll¬ 
ständigen, Liste der sofort verfügba¬ 
ren Programme, läßt sich aber schon 
deutlich erkennen, daß die Software¬ 
hersteller sehr rasch auf den neuen 
PC reagiert haben und auch die 
Preise entsprechend der Hardware 
angepaßt haben. 


Bei weitem noch nicht alles... 


Premiere feierte allerdings nicht nur 
der PC 1512, auch aus dem Hause 
DMV wurde ein neues Produkt erst¬ 
mals der staunenden Öffentlichkeit 
vorgestellt. Die neue Publikation 
PASCAL INTERNATIONAL wurde 
aus der Taufe gehoben und mußte 
sich den zahlreichen Interessierten 
und Kritikern stellen. Die ersten Er¬ 
gebnisse zeigen ganz deutlich, daß 
wir hier eine echte Marktlücke getrof¬ 
fen haben - herzlichen Glückwunsch 
an die PASCAL-Redaktion! 

Wir von der CPC-Redaktion können 
aufgrund des tollen Anfangserfolges 
von PASCAL auch leichter über den 
schmerzlichen Verlust unseres Joyce- 
Experten Michael Ceol hinwegkom¬ 
men. der sich nun vollends auf seine 
Arbeit bei PASCAL konzentrieren 
kann. Auch ihm wünschen wir alles 
Gute! 

Bei so vielen Neuheiten und Trends 
bleibt allerdings die Frage nach dem 
Altbewährten offen: Gemeint ist hier 



Der PC 1512 von Schneider sorgte für Furore. 
Unser Bild zeigt Peter Eschenbacher bei der 
Demonstration der neuen GEM-Software. 



PC-Software auch von Star Division. In Köln 
wurde zunächst der Star-Writer PC vorge¬ 
stellt. 


die Zukunft der vielen hunderttausend 
Anwender der CPC-Computer. 
Unsere klipp und klare Antwort hier¬ 
auf: CPC-Besitzer, ihr werdet auch 
in Zukunft nicht im Stich gelassen! 
Abzusehen ist eine Entwicklung, die 
den Heimcomputerbereich immer 
mehr mit dem großen Bereich der 
Personalcomputer verschmelzen läßt. 
Die natürliche Auslese steht kurz vor 
dem Abschluß, und eines ist schon 
jetzt sicher: Die Computer der CPC- 
Serie werden auch weiterhin sehr er¬ 
folgreich sein, wenn auch der Trend 
zur modernen Technologie, sprich 
16-Bit Rechner, zeigt. 

Gespräche mit Hard- und Software¬ 
herstellern ergaben, daß eifrig an 
Neuentwicklungen für CPC-Computer 
gearbeitet wird. Diese Aussagen gel¬ 
ten ebenfalls für den Joyce; obwohl 
Schneider den Preis für dieses Kom- 
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Großen Anklang fand die erstmals vorgestellte PASCAL INTERNA TIONAL aus dem DMV- 
Verlag. Das Softwaremagazin für Hochsprachen stößt in eine Marktlücke. 
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I Bericht 





plettsystem noch einmal überdenken 
sollte, will man eine klare Abgren¬ 
zung zum Schneider PC schaffen. 


Konkurrenz.... 


belebt das Geschäft und kommt in 
der Regel immer dem Verbraucher zu 
Gute. Gerade im Bereich der EDV 
sind Preisstürze keine Seltenheit, das 
aktuellste Beispiel dafür ist der 
Amiga von Commodore. Zur Orga- 
technik wurde der Preis auf DM 
1999 - (ohne Monitor) gesenkt, kurz 
vorher mußte man noch mehr als DM 
3.500,- (inkl.Monitor) auf den Tisch 
blättern. Wie Commodore den 
Amiga-Besitzern, die ihren Compu¬ 
ter noch für teures Geld erstanden ha¬ 
ben, diesen radikalen Preissturz er¬ 
klären wird, bleibt allerdings abzu¬ 
warten. 

Atari scheint sich endlich zu einer fe¬ 
sten Linie entschlossen zu haben, 
wenn auch schon wieder ein neuer 
Computer auf 32-Bit-Basis angekün¬ 
digt wird. 

Zumindest hat sich rund um den 
Atari ST ein Markt gebildet, der die 
häufigsten Anwendungen und Ein¬ 
satzbereiche abdecken kann, wenn¬ 
gleich auch noch deutliche Lücken 
erkennbar sind. 


Gehört, gesehen, notiert... 


Joyce-Anwenderprogramme fiir jeden Bedarf. Die Fa. Richter zeigte ihre komplette Produktpalette. 


Der Peripheriemarkt befindet sich im Aufwind. Der Trend zeigt eindeutig in Richtung „Laser¬ 
technologie”. 


Autoprotec, so nennt sich die neue 
Diskettenserie vom Datenträgerher¬ 
steller Computer plus. Die neuen 
Disketten im 5 VT’-Format besitzen 
zwei Schalter mit den Statusanzeigen 
ROT und GRÜN, die den jeweiligen 
Sicherungsstatus erkennen lassen. 
Diese Einrichtung kann u.U. vor 
ungewolltem Überschreiben von Da¬ 
ten schützen. 

Der Sybex Buch- und Softwareverlag 
bringt mit Star Kontor PC eine 
preiswerte Komplettlösung für Büros. 
Die Artikel- und.Lagerverwaltung ist 
beispielsweise schon für DM 175,- 
erhältlich. 

Ein tolles Digitalisiertablet konnten 
wir am Stand von CRP begutachten. 
Das leistungsfähige System ist, inkl. 
Software, für unter DM 1500 - erhält¬ 
lich und unterstützt gängige Softwa¬ 
repakete ohne Probleme (u.a. auch 
das CAD-Programm AutoCad von 


AutoDesk, das zur Anwendungs¬ 
software des Jahres gewählt wurde). 
PC-Software zum günstigen Preis 
wird es in Zukunft auch von Bertels¬ 
mann geben. Unter dem Label Public- 
Soft kommen Programme wie Text¬ 
verarbeitung, Kalkulation, CAD 
u.v.m. 

Einfallsreichtum kann den Ver¬ 
antwortlichen von SPI bescheinigt 
werden. Schon mit Open Access als 
integriertem Softwarepaket sehr 
erfolgreich, zeigte SPI in Köln Open 
Access II. Mit einer wohl einmaligen 
Aktion soll Open Access zum Stan¬ 
dard werden: SPI garantiert, daß der 
Verbraucher mit Open Access II 
zufriedener ist, als mit anderen 
integrierten Softwarepaketen. Weiter¬ 
hin nimmt SPI diese Pakete in Zah¬ 
lung und rechnet DM 1000,- vom 
Verkaufspreis ab. Die in Zahlung ge¬ 
gebene Software wird anschließend 
vernichtet! 


Beim Rundgang durch die insgesamt 
14 Ausstellungshallen fielen uns aber 
noch einige interessante Dinge auf, 
die es lohnt, einmal kurz zu erwäh¬ 
nen. 


Der Sybex- Verlag bringt preiswerte PC-Pro- 
gramme unter dem Label,, Star-Software ". 
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Zum Abschluß möchten wir Sie noch 
mit einem ungewöhnlichen Lernsy¬ 
stem bekannt machen. Sita Learning, 
das bedeutet Lernen im Unterbe¬ 
wußtsein ohne große Anstrengung. 

Englisch lernen - kein Problem! Das 
Sita System beinhaltet einen kleinen 
schwarzen Kasten, eine Art Kasset¬ 
tenrecorder und einen Kopfhörer mit 
Membrane. Diese Membrane mißt 
die Atemgeschwindigkeit und signa¬ 
lisiert den Entspannungszustand. 
Dann fängt die Kassette an zu 
laufen. 


Fazit: 


Die Orgatechnik ’86 war ein voller Er¬ 
folg. Veranstalter und Aussteller wa¬ 
ren sehr zufrieden, und im Hinblick 
auf das nahende Weihnachtsgeschäft 
konnten noch einige wichtige Auf¬ 
träge eingeheimst werden. Die näch¬ 
ste Orgatechnik wird dann wohl noch 
deutlicher zeigen, welche Bedeutung 
die EDV in Bereichen des täglichen 
Lebens und des Berufsalltags besitzt. 

(SR) 



Software-Schnell-Versand 


PC Spiele 


Alter Ego Female .... 79,QO 

Alter Ego Male . 79,00 

Art Studio. 99 00 

Borrowed Tine . 69!00 

Bruce Lee . 79,00 

Cyrus II Schach. 79,00 

Empire . 99.00 

Hacker . 69,00 

Hacker II . 69,00 

Jet (Flugsimulator) . 159,00 
Leather Goddesses 

of Phobos . 89 00 

Mean 18 Solf . 99,00 

Mlnd Forerer Voyaglng 99,00 

Mindshado» . 69,00 

Newsroom . 199.00 

Pitsiop II Autorennen 79.00 

Printmaster .. 149.00 

*°?ue . 69.00 

Silent Service . 89.00 

Snooker Billard . 79,00 

Summer Games II. 79,00 

Tass Time . 69,00 

Winter Games . 79,00 

STAR KONTOR Anwendersoftware 
Sonderprospekt anfordern 


Reisware-Maus-Pack 
für alle CPC's 



cpc-MousePack nur DM 209- 


Waldeck-Software 
Tulpenstraße 30 


PC Anwendungen 

GEM DIARY deutsch 

- Terminkalender,Alarmunr,Karteikasten . 149,00 

GEM DRAW deutsch 

- Objekiorlentlcrtcs Zeichenprogramm . 398,00 

GEH FONT EDII0R deutsch 

- Zeichensatzeditor . 398,00 

GEM GRAPH deutsch 

- Programm für Geschdftsgraf ik . 398,00 

GEM WRIlE deutsch 

- Professionelles Textpaket . 398,00 

GEM PAK Schneider PC 

- Paket aus DRAW,GRAPH.WRITE. 0 IARY . 1198,00 

IURB0 PASCAL 

- Pascal Compiler . 219,00 

TURBO PASCAL GRAFIK 

- Pascal Compiler mit Grafik-Routinen . 279,00 

TURBO PROLOG deutsch 

- Compiler,Editor,Debugger der Supersprache .... 398,00 

REFLEX deutsch 

- Datenbank mit grafischer Datenanalyse . 498,00 

DBASE III PLUS deutsch 

- Datenbanksystem mit Hacrosprache . 2398,00 

OPEN ACCESS II deutsch 

- Integriertes Prograrompaket . 2598,00 

DBASE II deutsch 

- Datenbanksystem mit Marcosprache . 396,00 

MULTIPLAN deutsch 

- Tabellenkalkulationsprogramm .. 298,00 

Auf Wunsch senden wir Ihnen zu den oben aufgeführten 
Programmen Inforaattonsmaterial zu 


JOYCE 

Spiele 

Batman . 59.00 

Colossos Schach .. 59,00 
Cyrus II Schach .. 59,00 

Fairlight . 59,00 

Hltcbhlleers Guide 89,00 
Lord of the Rings. 89,00 

SAS Raid . 59,00 

Space Invaders ... 49,00 
Tomahawk . 69,00 

Anwendungen 

Wordstar . 189,00 

Multiplan . 189,00 

dBase II . 189,00 

HS-Bastc. 189,00 

Turbo Pascal .... 219.00 
Turbo Tutor deut.. 99,00 
Turbo Toolbo« ... 219,00 
CBasIc Compiler . 169,00 

DR Oraw. 189,00 

DR Graph . 189,00 



2870 Delmenhorst Ladenverkauf: 

Tel.: 04221/1 6464 täglich 15.00 - 18.00 
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GEH auf dem PC 1512 


Daß zum neuen Rechner der Firma 
Schneider neben den Betriebssystemen 
MS-DOS und DOS PLUS auch noch 
das grafische Operationssystem GEM 
ausgeliefert wird, dürfte mittlerweile 
bekannt sein. 

MS-DOS und DOS PLUS sind, wie der 
Name schon sagt, Diskettenoperations¬ 
systeme wie das altbekannte CP/M. 
Im wesentlichen sind die Befehle und 
die grundsätzliche Anwendung auch 
gleich. Daß man natürlich mehr Mög¬ 
lichkeiten auf einem 16-Bit-Rechner 
hat, versteht sich von selbst. 

Was allerdings ist jetzt GEM? 


EINTRAG AUSWAHL 

Verzeichnis! A;W$IC2\*.BA$_ 


».IMG 


♦ BASIC? ,_ 

♦ GEHAPPT._ 

♦ GDDESIC. 


Auswahl 


AUSGABE STARTEN 


Fenster des 

itchens 


KAMERA FÄRB OPTIONEN 


Färbtabelle: EC0I1Q3E0GEECI 


HnQEQEnDQaQio 

Gegenwärtige Farbeinstellung 

Basis Farben; I Welp 1 


■ÜKESjE Rot 


IGF 


Trrr\ im.. ..ja 


*ra 



I OK I 
1 Abbruch] 


Gel^i Wagent3l Braun lfTr 


ORDNER INFORMATION 

Ordner Naue; 
Erstellt; 
Anzahl der Ordner; 
Anzahl der Einträge: 
Belegte Bytes: 


PROGRAMM, 
14-08-86 19:87 



Um weiterzuarbeiten, legen Sie die 
GEM Desktop Diskette in Laufwerk A: und 
klicken auf OK, Um zu DOS zurückzukehren 
klicken Sie auf Abbruch, 


PC Schneider International 

sucht noch freie Mitarbeiter für folgende Themen: 

• GEM: Realisierung eigener Anwendungen, Tips & Tricks etc. 

• 8086/8088-Assembler: Einführung, Programme, Tips & Tricks etc. 

• PC-Programme: Übersichten, Tests, Erfahrungen 

• Hardware: Erweiterungen, Tests, Tips und Selbstbau-Möglichkeiten 

Interessiert? 

Dann melden Sie sich schriftlich oder telefonisch beim DMV-Verlag, 

Herrn Ritter • Postfach 250 • 3440 Eschwege • Telefon (0 56 51) 87 02 
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Historisches 


Datei Optionen Sortierung 


DESKTOP 



GEM ist zunächst einmal kein eigen¬ 
ständiges Betriebssystem, sondern le¬ 
diglich eine Erweiterung für beste¬ 
hende Betriebssysteme. 

Dabei präsentiert sich GEM als ein¬ 
heitliche, bildorientierte Bedienungs- 
oberlläche, die unabhängig vom 
Rechner oder Betriebssystemtyp ein 
standardisiertes Arbeiten ermöglicht. 
Im Klartext heißt das, ein IBM-An- 
wender kann auch mit einem Atari 
520 ST arbeiten, wenn auf beiden 
Rechnern GEM verfügbar ist. 
obwohl Hardware und Betriebssy¬ 
stem bei beiden Rechnern völlig 
unterschiedlich sind. 

Die Systemaufrufe müssen nicht neu 
erlernt werden. Zudem erleichtert 
GEM durch seinen klaren Aufbau 
den Umgang mit System au frufen auf 
beiden Rechnern noch im hohen 
Maße. 

Dabei ist GEM gar nicht so neu und 
innovativ wie immer behauptet 
wird. 

Die Idee einer grafischen Benutzer¬ 
oberfläche mit Piktogrammen und 
Pull-Down-Menues stammt nicht 
etwa vom Apple Macintosh, wie all¬ 
gemein geglaubt wird, sondern fand 
schon vor Jahren in den Rechnern 
der Firma XEROX Verwendung. 

Der XEROX STAR war der erste 
Computer, der diese Möglichkeiten 
bot. Apple führte die Benutzerober¬ 
fläche lediglich als „fortschrittliches" 
Betriebssystem einer neuen Compu¬ 
tergeneration ein. Damals war von 
einem einheitlichen System oder gar 
GEM überhaupt noch nicht die Rede. 
GEM wurde erst in den letzten Jahren 
entwickelt, und fand seinen ersten 
Einsatz auf MS-DOS Systemen. Ge¬ 
schrieben wurde GEM unter C. 

Einer der Hauptnachteile der ersten 


MS-DOS Versionen war die unzurei¬ 
chende Geschwindigkeit bei Opera¬ 
tionen mit mehreren Fenstern. Das 
lag darin begründet, daß zum einen 
die Programmstruktur noch nicht ef¬ 
fektiviert war und zum anderen, daß 
das unbedingt notwendige Multita¬ 
sking von GEM selbst geboten wer¬ 
den mußte. 

In den neueren Versionen, die ja auch 
zum PC 1512 ausgeliefert werden, ar¬ 
beitet GEM schon mit merklichen 
Geschwindigkeitssteigerungen. Zur 
Hochform läuft das System jedoch 
erst in Zusammenarbeit mit multita¬ 
skingfähigen Betriebssystemen wie 
UNIX, Concurrent DOS oder DOS 
PLUS auf. 

Wie Eingangs erwähnt, gehört DOS 
PLUS auch zu der mitgelieferten Be¬ 
triebssoftware des PC 1512. Am ef¬ 
fektivsten arbeiten Sie also, wenn Sie 
GEM mit DOS PLUS betreiben. Ver¬ 
ständlich, da beide Systeme von der 
Firma Digital entwickelt wurden. 


Selbstverständlich arbeitet das GEM 
des Schneiders auch mit MS-DOS. 
Wo die Einschränkungen gegenüber 
der DOS-PLUS V ersion liegen, erfah¬ 
ren Sie später im Bericht. 


Oberflächliches über die 
Oberfläche 


Der grundlegende und auffälligste 
Unterschied gegenüber herkömmli¬ 
chen Betriebssystemen ist das 
Piktogramm-orientierte Arbeiten mit 
GEM. 

Statt, wie gewohnt, Befehlsfolgen über 
die Tastatur einzugeben, werden alle 
Befehle über Bilder mit der Maus an¬ 
gewählt und aktiviert. Unter Bildern 
versteht man Piktogramme (Sinnbil¬ 
der), die in direkter Assoziation mit 
ihrer Funktion stehen. 

Will man beispielsweise ein Lauf¬ 
werk anwählen, so hat das entspre- 


BEKANNTMACHUNG 

Bei unserem allseits bekannten und beliebten Telefon-Service, dem »Heißen Draht«, 
können Sie Ihre Fragen und Anregungen von 

17.00 - 20.00 Uhr 

an die Redaktion von PC Schneider International richten. 

Auf Ihren Anruf freuen sich: 

Michael Ebbrecht (Hardware, Joyce), Stefan Ritter (Redaktion), Thomas Morgen (Programmierung) 

und Heinrich Stiller (Spiele/Adventures). 

Jeden Mittwoch am HEISSENDRAHT 

Tel. (0 56 51)87 02 
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chende Piktogramm die Form einer 
Diskette, ein Subdirectory wird als 
Hängeordner dargestellt und eine 
Textdatei als Blatt mit einem 
Eselsohr. 

Wie das Desktop, so nennt man die 
Benutzeroberfläche, aussieht, kön¬ 
nen Sie in Abb.l sehen. 

Neben diesen Piktogrammen sind 
Pull-Down-Windows und Fenster 
die Hauptbestandteile des Desktop. 

Die Pull-Down-Windows „klappen” 
sich bei Anwahl über das Desktop 
auf, und erlauben dem Anwender 
eine schnelle und übersichtliche Se¬ 
lektion der Menuepunkte, 

Fenster können Informationen über 
Laufwerke, Dateien, und Einstellun¬ 
gen enthalten. Außerdem findet in 
den Fenstern die gesamte Bildschirm¬ 
ausgabe statt. Diese Fenster können 
verschoben, gerollt, vergrößert, geöff¬ 
net und geschlossen werden. Dabei 
werden, bis auf die Eingabe von Da¬ 
teinamen, bei manchen Funktionen 
alle Eingaben mit der Maus ge¬ 
steuert. 


Wie das Ganze nun gehandhabt wird, 
soll an dieser Stelle nicht erklärt wer¬ 
den, da darüber das Handbuch aus¬ 
reichend Auskunft gibt. 

Uns interessieren die Zusatzfünktio- 
nen von GEM, die im Handbuch 
unzureichend oder zu kompliziert er¬ 
klärt sind. 


Farben und Folgen 


Zunächst einmal muß das GEM über¬ 
haupt auf den Rechner gebracht 
werden. 

Hierzu gibt es nun drei Möglichkei¬ 
ten: 

- GEM unter MS-DOS starten 

- GEM unter DOS PLUS starten 

- GEM automatisch starten 

Wir beginnen mit der letzten 
Möglichkeit, da diese am einfachsten 
zu handhaben ist. Um GEM zu star¬ 
ten, legen Sie einfach die BLAUE Sy¬ 
stemdiskette in Laufwerk A und 
schalten den Rechnerein. Nach einer 
Weile wird der Bildschirm hell und es 
erscheint eine Dialogbox in der Mitte 
des Bildschirms. 


Zu diesem Zeitpunkt befindet sich 
GEM schon im Rechner, wie ja 
unschwer an dem Mauspfeil und der 
Dialogbox zu erkennen ist. Die Dia¬ 
logbox (auch ALERT BOX genannt) 
ist eine der Kommunikationsschnitt¬ 
stellen, die GEM benutzt. Solche 
Boxen werden Ihnen beim Arbeiten 
mit GEM oder Applikationen 
immer häufiger begegnen. 

Außerdem befindet sich noch ein 
kleiner Pfeil auf dem Bildschirm, der 
sogenannte Maus-Pointer. Wenn Sie 
nun die Maus bewegen, wird dieser 
Pointer allen Bewegungen folgen. 

In der Dialogbox werden Sie aufge¬ 
fordert, die Desktop Diskette (das ist 
die GRÜNE) einzulegen und auf OK 
zu klicken. Folgen Sie brav den An¬ 
weisungen des Rechners, und legen 
Sie die GRÜNE Diskette in Laufwerk 
A und klicken Sie auf OK. 

Wenn Sie jetzt auf der Tastatur ver¬ 
zweifelt eine Taste mit der Bezeich¬ 
nung OK suchen, haben Sie das 
Prinzip von GEM noch nicht 
verstanden. 

Bewegen Sie den Maus-Pointer über 


Lauter Anwendungsprogramme - Neues & Bekanntes 


PROFIREM 


KALKUREM 

Das Geschäftssoftwarepaket 

Fakturierung, Adressenverwaltung und Lagerdatei 
• universelle Einsatzmöglichkeiten 


Tabellenkalkulation mit Grafik 

• 40x40 Felder, auch für Text verwendbar 

• umfangreiche Berechnungsmöglichkeiten mit allen 

• Einlesen von Adressen/Artikeln in die Faktura 


• Speichern und Laden des Arbeitsfeldes 

• Speicherung von Rechnungen 


• Ausdrucken von Teilen des Arbeitsfeldes 

• komfortable Eingabemasken 


• Löschen von beliebigen Bereichen 

• Ausdruck sortierter Adressenlisten 


• Kopieren von Zeilen 

• Berechnung des Lagerwertes 

• Lieferung: 3” Diskette incl. Anleitung 

• für Joyce nur 178, - DM, für CPC nur 136, - DM 


• zusätzliche grafische Auswertung 

• Balkengrafik, Kurvengrafik, Kuchengrafik 

• Speicherung von Grafik 

• 3’ ' Diskette für CPC nur 78, - DM 

FIBUKING 

Die preiswerte Finanzbuchführung 



TEXTKING 

• 60 Konten, einfache oder doppelte Buchführung 

• Bilanzierung in Sekundenschnelle 


Die bedienungsfreundliche Textverarbeitung 

• Ausdruck von Grundbuch und Kontenblätter 


• Cursorgesteuerte Menues 

• incl deutscher Anleitung 


• Blocksatz, Textblockarbeiten 

• ideal für Kleingewerbe und Freiberufler 


• Tabulator 

• für Joyce oder CPC nur 136, - DM 


• Floskeltasten 

• wahlweise deutsche Tastaturbelegung 

ETATGRAF 


• Suchen und Ersetzen von Wörtern 

Das Haushaltsbuch mit Grafik 


• integrierte Diskettenverwaltung 

Verwalten Sie Ihre Ausgaben mit dem Computer. 


• Schnittstelle zu ADRESCOMP-Adressendatei 

• bis zu 18 verschiedene Kostenarten 


• fertige Druckformulare 

• Tabellen. Balken- und Kurvengrafiken 


• umfangreiche Schriftgestaltung 

• für CPC nur 58, - DM, Kassette 48, - DM 


• 3’ ' Diskette für CPC nur 78, - DM 

Weitere Programme für CPC’s 



Programm-Entwicklung und Vertrieb 

DATENREM - Dateiverwaltung 68,- DM 

ADRESCOMP - Adressendatei 58,- DM 

DELYSIS - Entscheidung per CPC . 58,- DM 


Elfriede van der Zalm 

COMFORM - Bankformular-Druck 48,- DM 


Schieferstätte, 2949 Wangerland 3 

VOKABI - Vokabeltrainer 58,- DM 


Telefon (044 61) 5524 



Versand erfolgt per Vorka95«lporrofr<« i Nachnahme Izzgl !i - DMl 
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das OK-Symbol im Dialogfenster 
und betätigen Sie den linken Knopf 
der Maus. Der Bildschirm wird sich 
löschen und Sekunden später haben 
Sie das Desktop auf dem Bildschirm. 

Befindet sich DOS PLUS schon im 
Rechner, so legen Sie die BLAUE Sy¬ 
stemdiskette in Laufwerk A und star¬ 
ten Sie durch Eingabe von GEM 
| ENTER). 

Auch bei dieser Variante können Sie 
GEM im vollen Leistungsumfang 
nutzen. 

Die dritte Möglichkeit, das Starten 
von GEM unter MS-DOS, erfordert 
zunächst einmal ein Einlegen der 
ROTEN Systemdiskette und das Ein¬ 
schalten des Rechners. Nachdem 
MS-DOS gebootet ist - Sie erkennen 
dies am Systemprompt A> - legen Sie 
wiederum die BLAUE Systemdiskette 
in Laufwerk A und starten durch 
Eingabe von: 

CEMSTART [ENTERJ 

Auch hier verhält sich der Rechner 
wie bei jedem Hochfahren des Desk¬ 


tops. Bedenken Sie jedoch, daß GEM 
unter MS-DOS nicht alle Funktionen 
hat. Die Unterschiede sind folgender 
Natur: 

Einschränkungen im MS-DOS-Betrieb 

- keine volle Arbeitsgeschwindigkeit 

- der Format-Befehl funktioniert nicht 

- es können keine Dateien vom Typ 
.CMD aufgerufen werden 


Applikation mit Komplikation 


Nachdem Sie das Desktop vor sich 
haben, können Sie entweder damit 
arbeiten wie mit einem Betriebssy¬ 
stem, oder eine GEM-spezifische 
Applikation anwenden. 

Was bitte ist jetzt eine Applikation? 
Eine Applikation ist ein Programm, 
welches auf den Grafikroutinen von 
GEM aufbaut. 

Das Desktop, das Sie vor sich haben, 
ist bereits eine GEM-Applikation. 
Andere Applikationen sind BASIC 2 
und GEM-PATNT, die auch zum Lie¬ 
ferumfang des PC 1512 gehören. 


Wie Sie nun eine solche Applikation 
installieren, wollen wir am Beispiel 
von GEM-PAINT erläutern. 
GEM-PAINT ist, wie bereits erwähnt, 
eine Applikation zu GEM. Sie finden 
das Programm auf der GELBEN Sy¬ 
stemdiskette. Damit, daß Sie das 
Programm gefunden haben, ist aber 
noch lange nicht gewährleistet, daß 
Sie auch damit arbeiten können. Aus 
irgendeinem Grund hat man sich bei 
Schneider dafür entschlossen, die Be¬ 
standteile der einzelnen Programme 
auf den vier Disketten zu verstecken. 
GEM-PAINT kann zwarzum Malen, 
was ja auch der eigentliche Zweck des 
Programms ist, eingesetzt werden; 
wenn es jedoch ans Ausdrucken 
geht, erscheint nur eine Alert-Box, die 
mitteilt, daß eine entsprechende 
Datei nicht gefunden werden kann 
und auch keine Möglichkeit bietet, je¬ 
mals wieder zu GEM PAINT 
zuriiekzukehren. 

Vielleicht ist dies gewollt, um dem 
Anwender etwas über Subdirectories 
und Diskettenbehandlung beizubrin¬ 
gen - mir erscheint es jedoch ein 
weiterer Beweis dafür zu sein, daß es 
völlig unmöglich ist, ein perfektes 
Handbuch zu machen. 



WEB — 


Die 20 MB WINCHESTER-EXPANSION-BOX für JOYCE 


(kein Nachbau!) 


kompatibel mit LocoScript und CP/M Plus 

mit formschöner Aufbaukonsole 


Controlier-Card, Kühlsystem, Netzteil 



und 


OUICK-DATA WEB 


Das erste GSX-Geschäftsprogramm speziell für Festplattenbetrieb 

für die Probleme des Versandgeschäftes 


mit Standards ITOH Serie 8510 BP, SP BINDER MFP 6000 u. EPSON 

MODULE FÜR MAHNWESEN, ARTIKELBEZOGENE STATISTIK SOWIE 

NACHNAHME-PAKET und NACHNAHME-PÄCKCHEN ERHÄLTLICH 

QUICK-CALC 2.1 

Buchhaltung 

148 DM 

QUICK-BILL 2.0 

Angebot, Rechnung 

168 DM 

QUICK-NAME 2.0 

Adressverwaltung 

128 DM 

QUICK-CINE 2.0 

Videoarchiv 

98 DM 

QUICK-DATA 3.0 

Geschäftssoftware GSX IM 

228 DM 

QUICK-DATAWEB 

nur Festplattenbetrieb 

498 DM 

QUICK-MAHN 3.0 

Modul für Mahnwesen 

68 DM 

QUICK-STAT 3.0 

Modul für Statistik 2 

78 DM 

QUICK-ZAHL 3.0 

Modul für Zahlkarten 

119DM 

KIT PC8256/TMS 

512 KB RAM-Erweiterung 

99 DM 

DISK DRIVE 1MB 

Laufwerk für JOYCE 

564 DM 

FILTER 

Bildschirmfilter 

79 DM 

LIGHT-PEN 

incl. Software 

p.A. 

LocoMail 

Mail Merge f V 1.21 

p.A. 

MOUSE 

Interface + Software 

p.A. 

WINCHESTER 

Expansion Box, 20 MB 

p.A. 

FAX-ADAPTOR 

Telefax, Telex 

p.A. 

Fordern Sie unser Info-Material an! 

Fa. WERDER - Nachrichtentechnik 

Bramfelder Ch. 215 

2 Hamburg 71 • (040) 641 1779 


ESCHCOMP - SYSTEM 

COMPUTER -VERTRIEB 


EDV-Beratung 
Hardware + Software 


UNSERETOP-TEN Programme 

1 . Lehrer-Schulverwaltung 

für CPC 464/664/6128 3 98, - DM 

(Version für JOYCE u MS-DOS in Vorbereitung) 

2. Einnahme-Überschuß-Rec hnung 

für CPC 464/664/6128/Vortex 288. - DM 

für Joyce / MS-DOS 398,- DM 

3. Appartement/Hotel-Abrechnung 

für Joyce / MS-DOS 1298, - DM 

248, - DM 


4. Hausverwaltung/Mieter 

für CPC 464/664/6128 

5. Super-Lotto RUN 49 

für CPC 464/664/6128/Vortex 
für Joyce /MS-DOS 

6. Lohn/Gehalt Abrechnung 

für CPC 464/664/6128/Joyce 

7. Star-Wrlter v. Star-Divlsfon 

für CPC 464/664/6128 

8. Versicherungs-Agentur 

Vortex VDOS 2 0 

9. Pauker-Lemprogramm 

für CPC 464/664/6128 

IO. Mathematik-Trainer 

für CPC 464/664/6128 

(Bitte INFO’s anfordem) 


Händleranfragen erwünscht 


99,- DM 
99, - DM 


599, - DM 

198,- DM 

288, - DM 

59, - DM 

59,- DM 


Star-Division 
Spi tzen-Sof twa re 

lür CPC 464/664/6128/Joyce/Vor‘ex 

Fibu-Star Plus 290,- DM 

Business-Star 298,- DM 

Datei-Star 198,- DM 

Star-Writer I 198,- DM 

Star-MONitor 79,- DM 

Statistic-Star 79,- DM 

Copy-Starll 39,- DM 

M O.S 98,- DM 


(Bitte Liste anfordern) 


SüSIf Computerdrucker 


NL 10 mit Modul 
NG 10 mit Modul 
SG 15 
SD 10 
SD 15 
SR 10 
SR 15 
NB 15 


a A 
a A 
a A 
a A 
a A 
a A 
a A 
a A 


Alle Geräte mil FTZ-Nf. und deutschem Handbuch 
autom Einzelblatteinzug {aut Anfrage) 
STAR Farbbänder u Zubehör (auf Anfrage) 


ESCHCOMP 

ERNST 

SCHEITHAUER 

Tel. 

SYSTEM 

839 1 

PERLESREUT 

(085 55) 1390 
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Im Handbuch erfährt man dann, daß 
man sich erst eine Arbeitsdiskette von 
GEM PAINT erstellen muß. Wie 
man allerdings eine solche Kopie er¬ 
stellt, ist in den einzelnen Kapiteln 
des Handbuchs genauso versteckt, 
wie die erforderlichen Dateien auf 
den Disketten. 

Nachfolgend nun eine Schritt für 
Schritt Anleitung, nach der es eigent¬ 
lich kein Problem sein sollte, eine 
lauffähige Version von GEM PAINT 
zu erstellen : 

1 Booten Sie das System durch Ein¬ 
legen der roten Systemdiskette 
und Einschalten des Rechners. 

2. Legen Sie eine Leerdiskette in 
Laufwerk B und geben Sie ein: 
FORMAT B: 


üb 

$ 3:17 

L 

1 1 

88 




AHtLTRM.PNT AHJLTMLFNT Efl 

□ □ 
IPJHTN4.FNT OESK.QEH 




0 


FLOFFV DISK flÖFFY DISK 


H1 Druck Spooler 


□ □ □ 


□ 

TPUT.RSC 






HSS14.FKT IPJHTW7.FNT EPSHTMO.FKT 


Rgchaer 


EC 

C 

♦V 

x 


3. Die Diskette in Laufwerk B wird 
formatiert. 

4. Entfernen Sie die rote Diskette 


7. Entfernen Sie die gelbe Diskette 
aus Laufwerk A und legen Sie 
dafür die grüne Desktop-Diskette 


ein. 


9. Nehmen Sie die grüne Diskette 
aus Laufwerk A und legen Sie 
dafür die blaue Diskette ein. 

10. Geben Sie folgende Befehlsfolge 


aus Laufwerk A und legen Sie 

8. Geben Sie folgende Befehlsfolge 

ein: 

[ENTER] 

dafür die gelbe Diskette ein. 

ein: 


a>CD GEMSYS 

a>B: 

[ENTER] 

a>COPY A: 


5. Geben Sie ein: CD GEMAPPS 

b>MD GEMSYS 

[ENTER] 

OUTPUT.* B: 

[ENTER] 

| ENTER | 

b>CD GEMSYS 

[ENTER] 

a>COPY A:*.OPT B: 

[ENTER] 


b>A: 

[ENTER] 

a>CD.. 

[ENTER] 

6. Kopieren Sie alle Dateien des 

a>CD GEMSYS 

[ENTER] 

a>B: 

[ENTER] 

Subdirectories durch Eingabe von 

a>COPY A:*.* B: 

[ENTER] 

b>CD.. 

[ENTER] 

: COPY A:*.* B: [ENTER] 

a>CD.. 

[ENTER] 






11. Betätigen Sie gleichzeitig die Ta- 


sten ALT, CTRL und DEL. 



12. Booten Sie das Desktop in ge¬ 
wohnter Weise. Die fertige und 
sofort arbeitsfähige GEM PAINT 
Workdisk befindet sich in Lauf¬ 
werk B und muß nur noch be¬ 
schriftet werden. 

Hinweis: 

Die Zeichen a> und b> sind die Sy- 
stemprompts und werden nicht mit 
eingegeben 


Zum Schluß... 


Wie Sie sehen, benötigt es eine Menge 
Aufwand, um sich erst einmal eine 
Arbeitsgrundlage mit den gelieferten 
Disketten zu schaffen. 

Die Systemdisketten halten noch so 
manches Geheimnis verborgen. Wir 
werden Sie an dieser Stelle jedoch 
laufend über neue Erkenntnisse 
informieren und gemeinsam mit 
Ihnen die Rätsel der GEM-Welt 
entschlüsseln. 

(TM) 
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DAS PROFESSIONELLE CAD-SYSTEM 

GRAFRAD 3 

FÜR DEN JOYE PCW 8 256 UND PCW 8512 



■ Frei wählbarer Zeichensatz 

■ Freiwählbarer Cursorsprung 

■ Maßstabgerechtes Erstellen 

■ 16 verschiedene Linientypen 

von Zeichnungen 

■ 16 verschiedene Schriftarten 

■ Maßeinheiten können angegeben 

■ Dehnen, kippen, rotieren, kopieren 

werden 

■ Verschieben und löschen aller 

■ 16 verschiedene Zeichnungsebenen 

Symbole, Texte, Objekte 

■ Symbolbibliotheken können angelegt 

■ Vergrößern und verkleinern 

werden 

■ Abrunden von Kanten 

■ Stufenlose Zoomfunktionen 

■ Automatisches Bemaßen 

■ Freiwählbares Raster 

■ Schraffieren 


Die Sensation: 

DM 549,- 

Verkaufspreis inclusive 1 Grafiktablett, 1 Soft¬ 
ware G3,1 Interface, 1 Zeichenstift 

PiZie-Data, H.-J. Piorreck 
Mittelstraße 61, Tel. 02339/71 91 
4322 Sprockhövel 2 


Ausschneiden und auf Postkarte kleben 

O Hiermit bestelle ich per Nachnahme/Vorkasse 
O Senden Sie mir bitte ausführliches Informationsmaterial 


Vorname, Name 
Straße, Hausnummer 
PLZ, Ort 
Telefonnummer 


] 


Datum, Unterschrift 
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Video-IOOO I 

Ein Digitizer 
für den PC 1512 


chen 88 Zeilen auf- und abgescrollt 
werden. Die Taste R (Record) hält das 
aktuelle Bild auf dem Monitor zur 
Abspeicherung oder zum Ausdruck 
auf einem Matrixdrucker (Hardcopy) 
fest. 

Eine sinnvolle Option stellen auch 
zwei auf der Masterdiskette befindli¬ 
che Files dar. die in selbsterstellte 
Programme eingebunden werden 
können und das Digitalisieren eines 
Bildes in den Modi 640x200 und 
640x288 erlauben, ohne hierfür das 
Hauptprogramm aufrufen zu müs¬ 
sen. 

Das Abspeichern von digitalisierten 
Bildern kann als Daten- oder COM- 
File erfolgen, wobei die COM-Files 
mehr zu Demonstrationszwecken ge¬ 
eignet sind, da sie vom Hauptmenue 
aus nicht mehr aufgerufen werden 
können. Zum Abspeichern bereite 
Bilder können durch Drücken der 
Taste I invertiert werden. 

Zusammenfassung der Daten (bezo¬ 
gen auf PC 1512): 

max. Auflösung: 640x288 Pixel, zwei 
Grau stufen 

Benötigte Peripherie: TV-Gerät oder 
Videorecorder oder Videokamera mit 
genormtem Video-Ausgang 
Interface steckbar in beliebigen Ex¬ 
pansionsslot des PC 
Preis des Interfaces mit Software: 
ca. 495 - DM 
Vertrieb: Ing.-Büro Fricke 
1000 Berlin 37 

(ME) 


Neben dem Rechner und dem Inter¬ 
face. brauchen Sie noch ein TV-Gerät, 
einen Videorecorder oder eine Vi¬ 
deokamera - und los geht’s. 

Video 1000 I digitalisiert Videobilder 
im TV-Format in Echtzeit mit einer 
Auflösung von 640x200 Bildpunkten. 
Bei der Verwendung von Standbil¬ 
dern beträgt die maximale Auflösung 
640x288 Punkte mit max. 16 Grau¬ 
stufen. 

Nach dem Einbau des Interfaces 
kann dieses nach Booten von MS- 
DOS auf den jeweiligen Rechner an¬ 
gepaßt werden; für den PC 1512 
kommt die Installation an die Farb¬ 
grafikkarte in Frage. Hiernach er¬ 
reicht man ein Hauptmenue, in dem 
gewünschte Aktionen ausgewählt wer¬ 
den. Mit den Funktionstasten Fl - F4 
wird die Auflösung des Bildes ange¬ 
wählt. die beim PC 1512 jedoch maxi¬ 


Otto Waalkes hard-copiert 


mal vier Grauwerte (Auflösung 320x 
200) erlaubt. Die +/—Tasten erlau¬ 
ben die Helligkeitsveränderung der 
Bildschirmdarstellung. Mit den Cur- 
sortasten (auf und ab) können in den 
Modi 640x200 und 320x200 die restli¬ 


Foto der Interfacekarte 
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STAR-MAIL V2.0 (JO YCE/JO YCE Plus) 

Das Erweiterungsprogramm zum „LOCOSCRIPT“! 

Das bietet Ihnen STAR-MAIL: 

• Rechnen und Kalkulieren in Locoscripttexten 

• Erstellen von formatierten Tabellen und Formularen in 
Locoscript 

• Vergleichen und Auswahlen zwischen Textabschnit¬ 
ten im Locoscript 

• Interaktives Briefeschreiben mit Locoscript 

• Erstellen von Serienbriefen und Werberundschreiben 
mit Locoscript (nur in Verbindung mit DATEI-STAR) 

• Erstellen von selbstrechnenden Textformularen (für 
Rechnungen, Angebote. ) im Locoscript 

• Erstellen von individuellen Verkaufs-, Artikel-, Lager¬ 
listen mit Locoscript 

• Bedrucken von vorgefertigten Formularen mit Loco¬ 
script 

• Drucken von Locoscripttexten auf jedem Fremd¬ 
drucker (CPS erforderlich) 

• Ausführliches Handbuch mit Übungsteil 

• Preis: 98,- DM 


DA TEI-STA RV 2.0 zzzzz, 

Die universelle Dateiverwaltung für die JOYCE! 

• Einfache Bedienung durch PULL-DOWN-Menues 

• Freidefinierbare Eingabemaske mit 30 Datenfeldern 

• 1400 Zeichen pro Datensatz 

• Freidefinierbare Such-, Sortier- und Druckmaske 

• Integrierte Kalkulationsmöglichkeiten (Rechenfelder) 

• Suchen/Selektieren/Sortieren/Etiketten-u Listen¬ 
druck 

• Preis: 98,- DM 

DA TEI-STARS STA R-MAIL gibt es im Paket als JOYCE¬ 
MAILING-SYSTEM für 189,- DM. 


BUSINESS-STAR V 2.0 

(JOYCE/JOYCE Plus) 

Die professionelle Auftragsbearbeitung für alle JOYCE-Rech- 
ner! 

Bestehendaus Fakturierung, Lagerverwaltung, Mahnwesen, Daten¬ 
verwaltung und Dienstprogrammen: 

Fakturierung: 

• Schreiben von Rechnungen/Lieferscheinen/Auftragsbestäti¬ 
gungen mit automatischer Speicherung auf Diskette (ca. 

800 Aufträge im A-Laufwerk/ca 3200 Aufträge im B-Laufwerk) 

• Automatisches Ausbuchen der gelieferten Artikel aus der 
Lagerdatei 

• Eindruck von bis zu 8 Werbetexten in den Auftrag 

Lagerverwaltung: 

• Wareneingang vermerken 

• Umfangreiche Warenkalkulationen 

• Lager- u. Verkaufsstatistiken 

• Mindest- u Meldebestand anzeigen 

• Drucken von Preislisten 
Mahnwesen: 

• Automatisches Mahnen mit drei Mahntexten 

• Schreiben von individuellen Mahnungen 

• Ausdrucken der fälligen Rechnungen/Mahnungen 

• Offene-Posten-Buchhaltung 
Datenverwaltung: 

• Erfassung des Kundenstamms (ca. 700 Adressen im A-Lauf- 
werk, ca. 2800 Adressen im B-Laufwerk) 

• Erfassung des Lieferantenstamms (ca. 700 Adressen im 
A-Laufwerk, ca. 2800 Adressen im B-Laufwerk) 

• Erfassung des Artikelstamms (ca 850 Artikel im A-Laufwerk, 
ca 3400 Artikel im B-Laufwerk) 

Dienstprogramme: 

• Programmvoreinstellungen ändern 

• Briefkopf entwerfen 

• Mahnungstexte entwerfen 

• Werbetexte entwerfen 

Weitere Informationen zu BUSINESS-STAR entnehmen Sie bitte 
unserem Katalog! Änderungen zum Programm werden auf 
Wunsch angefertigt! 

Preis: 298,- DM inkl Diskette u Handbuch 


FIBU-STAR Plus (JOYCE/JO YCE Plus) 

Endlich gibt es eine professionelle Finanzbuchhal¬ 
tung für die SCHNEIDER-Computer! 

• Stammdatenverwaltung und Umsatzsteuervoranmel¬ 
dung 

• Frei wählbarer Umsatzsteuerschlüssel zur automati¬ 
schen Ermittlung der Steuerbeträge und deren Ver¬ 
buchung auf den Mehrwert- und Vorsteuerkonten 

• Frei wählbarer Kontenrahmen (bis zu 400 Konten) 

• Frei wählbare Zuordnung der Sach- und rechnenden 
Konten 

• Buchungsjournal, Kontenblätter und Jahresabschluß 

• Summen- und Saldenlisten der Kreditoren, Debitoren 
und Sachkonten 

• Einfaches Erfassen aller Buchungsbelege mit oder 
ohne Protokoll 

• Buchungen können so durchgeführt werden, wie sie 
auf den Tisch kommen, da alle Buchungen chronolo¬ 
gisch und innerhalb eines Datums nach Belegnum¬ 
mern sortiert werden 

• Einfache Bedienung und hohe ABSICHERUNG gegen 
Bedienungsfehler 

• Preis 298,— DM 

Das Programm FIBU-STAR Plus ist erstmals unter dem 

Namen FIBU-M 1980 installiert worden und hat sich seit¬ 
dem sehr oft in der Praxis bewährt. 


STAR-BASE 


(JOYCE/JOYCE Plus) 


STAR-BASE ist ein anwenderfreundliches Datenbank¬ 
system mit unglaublichen Fähigkeiten! 


• Eigener Window-Manager 

• Menueorientierte Bedienung und Programmierung 

• Volle Unterstützung des JOYCE-Bildschirms 

• Eingabemaske über 9 Bildschirmseiten 

• 100 Datenfelder pro Eingabemaske 

• 88 Zeichen pro Datenfeld 

• 2060 Zeichen pro Datensatz 

• Max. 8 Zugriffsschlüssel 

• Komplette Indexverarbeitung 

• Suchen u. Selektieren nach allen Datenfeldern 

• 32767 Datensätze pro Datei 

• Verknüpfung von mehreren Dateien 

• Zu jedem Datensatz kann eine Unterdatei mit max. 255 
Zeichen pro Satz angelegt werden 

• Kompletter Reportgenerator 

• Star-Base arbeitet voll mit Locoscript zusammen 

• Umfangreiche Rechenfunktionen 

• Serienbrieferstellung 

• Integrierter Texteditor 

• Direkter, menuegesteuerter Datensatzzugriff 

• Mehrspaltige Formulare 

• Eigener Menuegenerator 

• Einfachste Maskendefinition 

• Passwort für eine Datei 

• Ausführliches Handbuch (180 Seiten) 

• Preis: 198,— DM inkl. Diskette u. Handbuch 


Weitere interessante Programme finden Sie in unserem ausführlichen Katalog! 


UELZENERSTR. 12^.”=='=’= = = 
2120 LUNEBURG == ^5 = ~ 

FERNRUF (041 31) 40 25 50 == =T== = k 



Vertrieb für die Schweiz: 

IfCS Video-Computershop 
Schaffhauserstraße 473 

P O Box 103, CH-8052 Zürich 
Telefon 01 / 3 02 26 00 

Händleranfrage 

erwünscht 

Software-A utoren 
gesucht 

Vertrieb für Österreich: 

Ueberreuter-Media 

Alserstraße 24, A-1091 Wien 
Telefon 4 81 5380 

Unsere Produkte sind 
in allen führenden 
Computer-Shops 
sowie bei Karstadt 
und Brinkmann , 

erhältlich! ) 


□ Senden Sie mir unverbindlich Ihren Katalog 

□ 6128 D664 D464 □ JOYCE 

□ Hiermil bestelle ich per Vorkasse/Nachnahme 

Vorname..— 

Name-- 

Straße_ 

Wohnort_ 

Datum/Unterschrift- 

(Alle Preise verstehen sich als unverbindliche 
Preisempfehlungen inkl zzg. 5,— DM 

Porto u. Verpackung) 
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Grafpad 3: CAD für PC 1512 


Diese Version des Grafiktabletts hat 
nach intensiver Weiterentwicklung 
nicht mehr viel mit dem für die CPC's 
angebotenen Vorgänger gemein. 

Wir hatten auf der Orgalechnik Gele¬ 
genheit, das Grafpad sowohl auf dem 
PC als auch auf dem Joyce zu begut¬ 
achten, und waren von der Leistungs¬ 
fähigkeit doch recht beeindruckt. Die 
Joyce-Version unterscheidet sich von 
der PC-Version in den Leistungs¬ 
merkmalen nicht; jedoch macht sich 
die geringere Rechengeschwindigkeit 
schon bemerkbar. 

Neu an der Hardware ist der deutlich 
schlankere Zeichenstift, der auch 
einen kleinen Mikroschalter zur Ein¬ 
gabebestätigung enthält. Hierdurch 
ist ein deutlich präziseres und auch 
komfortableres Arbeiten möglich. 
Ebenso auffällig ist der um viele 
Funktionen erweiterte Menuebe¬ 
reich, der inzwischen auf dem Tablett 
den gesamten Zeichenbereich um¬ 
schließt. 

Die gravierenden Veränderungen 
finden jedoch auf der Softwareebene 


statt. Neben den als Standard voraus¬ 
zusetzenden Zeichenfunktionen ste¬ 
hen einige komfortable Features zur 
Verfügung, die dem Anwender einen 
großen Teil anfallender Routinear¬ 
beiten zu erleichtern bzw. abzuneh¬ 
men, in der Lage sind. So sei hier die 
wirklich ausgezeichnete Zoom-Funk¬ 
tion erwähnt, die eine (im sinnvollen 
Rahmen) beliebige Verkleinerung des 
Originals und das Einfügen von Er¬ 
gänzungen, Details oder Symbolen 
erlaubt. 

Eine Verkleinerung im Maßstab 
1:10000 ist problemlos zu realisieren. 
Ein einzu fügendes Symbol wird 
automatisch mitgezoomt, kann aber 
auch „per Hand” auf die gewünschte 
Größe gebracht werden. 

Farbe und Strichstärke des Zeichen¬ 
stifts können jederzeit in 16 Versio¬ 
nen angewählt werden, erstellte 
Zeichnungen oder Ausschnitte kön¬ 
nen beliebig gedreht und auch gespie¬ 
gelt werden. 

Eine weitere nützliche Funktion ist 
ein komfortables Rastermenue, wel¬ 


ches die beliebige Anwahl vordefi¬ 
nierter und selbst zu erstellender 
Hilfsraster erlaubt; eine (abschaltba¬ 
re) Snap-in-Funktion zwingt das 
Fadenkreuz auf die eingestellten Bah¬ 
nen. Das Papierformat der Zeich¬ 
nung kann zwischen A0 und A5 frei 
gewählt werden; ebenso ist die Defi¬ 
nition eines eigenen Papierformats 
vorgesehen. Die Skalierung wird 
hierbei automatisch umgeschaltet. 

Schließlich sei noch das Symbol- 
menue erwähnt, welches die komfor¬ 
table Erstellung und Bearbeitung von 
Symbolen jeder Art recht vereinfacht. 
Nach Angaben des deutschen Händ¬ 
lers sollen zu einem späteren Zeit¬ 
punkt spezielle DIN-gerechte Sym¬ 
boldateien für verschiedene Anwen¬ 
dungsbereiche angeboten werden. 

Preise des Grafpad 3: 

Version PC 1512: ca. 798 - DM 
Version PCW 8256/8512: ca. 549,- DM 
Vertrieb; PiZie Data 
4322 Sprockhövel 

(ME) 
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der Typenraddrucker 
für alle 

Schneider Computer 


★ hat das richtige Schriftbild für Anspruchsvolle 

★ schreibt schnell (bis zu 15 Zeichen/sec.) und leise (kleiner 65 dB) 

★ bedruckt Etiketten, Endlospapier, Briefpapier 

★ ist durchschlagend: Original plus 4 Kopien 

★ läßt vielfältige Gestaltungsmöglichkeiten zu: drei verschiedene Zeichen¬ 
dichten, Schatten- und Fettdruck, autom. Unterstreichen voll und wort¬ 
weise, hoch- und tiefstellen, halber Zeilenschritt vorwärts und rückwärts 

★ druckt bidirektional mit Druckwegoptimierung 

★ ist Diablo-kompatibel (Diablo 630) 

★ gibt LocoScript-Texte (JOYCE) über das Programm L0C015 (DM 59,-) aus 

★ hat serienmäßig parallele und serielle Schnittstelle, Traktor und Selbsttest 

★ ist der Typenraddrucker von SchneiderData für Schneider Computer 


SchneiderData • Rindermarkt 8 • D-8050 Freising • Telefon 08161/2877 


Schneider «L 
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Softwareführer’86 
für Personal Computer 
Rossipaul Verlag 1985, 

736 Seiten, 

ISBN 3-87686-020-2, 
Preis: DM 28,- 

Die Softwarepalette für Per¬ 
sonalcomputer ist inzwi¬ 
schen derart umfangreich 
geworden, daß man leicht 
den Überblick verlieren 
kann. Gerade die zeitauf¬ 
wendige Suche nach Bran¬ 
chenlösungen oder Spezial¬ 
programmen erfordert ein 
übersichtlich und klar ge¬ 
gliedertes Nachschlagewerk. 
Ein solches Software-Sam¬ 
melsurium birgt der Soft- 
warefiihrcr '86 aus dem 
Rossipaul-Verlag, der schon 
für den Softwarefiihrer Heim¬ 
computer verantwortlich 
zeichnete. In diesem Buch 
sind mehr als 2600 PC-Pro- 
gramme inkl. Kurzbeschrei¬ 
bung aufgeführt und nach 
Branchen und Anwendun¬ 
gen gegliedert. Das alpha¬ 
betische Programm- und 
Anbieterverzeichnis dient 
der Übersichtlichkeit und 
fördert die schnelle Suche 
nach bestimmten Informa¬ 
tionen. 



Fazit: Der Softwareführer 
ist für alle PC-Anwender 
und -Interessierte ein wichti¬ 
ges Nachschlagewerk, sofern 
es um die Anschaffung ei¬ 
ner PC-Software geht. 
Kaufberatung kann aus ver¬ 
ständlichen Gründen nicht 
erfolgen, doch kann ein 
rascher Blick in dieses Ta¬ 
schenbuch vorab viele Din¬ 
ge klären, die bei einer Soft¬ 
wareanschaffung anfallen. 


Bartel/Stein: 

Das kann der Schneider PC 
Data Becker 1986, 

173 Seiten, 

ISBN 3-89011-250-1, 
Preis: DM 29 - 

Das erste Buch zum Schnei¬ 
der PC liegt bereits zur 
Markteinführung des Sen¬ 
sationscomputers vor. 


Das kANNÜER 

SdiNEidER 

PC 


EIN DATA BECKER BUCH 


Auffallend ist die Konzep¬ 
tion des Buches, die den 
Leser und Computerinteres¬ 
sierten an den Schneider 
PC heranführen und die 
Technik auch für Laien 
plausibel machen soll. 
Nach einer ausführlichen 
Beschreibung des neuen 
Schneider Rechners folgen 
eine Auflistung möglicher 
Anwendungen sowie eine 
vielversprechende Erläute¬ 
rung der PC-Internas wie 
z.B. NVR, CPU 8086 etc. 

Fazit: 

Alle am neuen Schneider PC 
Interessierten können sich 
durch die Lektüre dieses 
Buches einen Überblick 
über Leistungsfähigkeit der 
Hard- und Software ver¬ 
schaffen. 


Buchert: 

PC nach Maß 
Vieweg Verlag 1986, 
ca. 250 Seiten, 

ISBN 3-52804450-0, 

Preis: DM 68,- 

Dieses Buch ist ausschließ¬ 
lich für diejenigen gedacht, 
die sich mit der Anschaffung 
eines PC's sowie der zuge¬ 
hörigen Software tragen. 


Das Hauptaugenmerk liegt 
hier bei der betrieblichen 
Anwendung des Computers 
mit vielen praktischen Tips 
für einen Einstieg in die 
EDV. 

Demnach gestaltet sich auch 
die Gliederung des Buches, 
das in vier grundlegende 
Kapitel unterteilt ist. 

Im ersten Kapitel werden 
zunächst die Ziele und Ar¬ 
beitsgebiete der EDV im 
Betrieb festgelegt. Anschlie¬ 
ßend erfolgt die Auswahl der 
geeigneten Software; hier 
sind die im Buch befindli¬ 
chen Checklisten sehr be¬ 
hilflich, um größtmögliche 
Effektivität zu erreichen. 
Erst dann erfolgt die Aus¬ 
wahl der Hardware, die na¬ 
türlich auch die erforderli¬ 
che Peripherie umfaßt. 

Zum Schluß bekommt man 
Tips zur Auswahl der Part¬ 
ner bei Beratung und Ser¬ 
vice, ein nicht zu unter¬ 
schätzender Aspekt der be¬ 
trieblichen EDV. 

Fazit: Das vorliegende Buch 
bietet zahlreiche F.ntschei- 
dungshilfen, die beim Um¬ 
stellen eines Betriebsablau¬ 
fes auf EDV sehr hilfreich 
sind. 

Die im Anhang befindlichen 
Arbeitsblätter und Check¬ 
listen dienen der Übersicht¬ 
lichkeit und helfen, mögli¬ 
che Fehlentscheidungen 
schon frühzeitig zu erken¬ 
nen. 

Heim: 

Multiplan im Einsatz 
für 16-Bit PC’s 
IWT-Verlag 1986, 

156 Seiten, 

ISBN 3-88322-074-4, 
Preis: DM 48,- 

Eines der bekanntesten und 
längst zum Standard ge¬ 
wordenen Softwarepakete 
ist Multiplan, das sowohl 
auf8-Bitals auch auf 16-Bit 
Computern zum Einsatz 
kommt. 

Dieses Buch bietet eine 
leicht verständliche Einfüh¬ 
rung in die Arbeit und den 
Umgang mit Multiplan auf 
16-Bit PCs. 


Im ersten Kapitel wird All¬ 
gemeines über Multiplan 
besprochen und ist für An¬ 
fängerdenkbargeeignet. Es 
folgt eine Zusammenstel¬ 
lung aller Befehle und Be¬ 
schreibung der Funktionen. 
Diese Übersicht kann auch 
ideal zum Nachschlagen 
dienen. 


Multiplan 
im Einsatz 
furl6bit*Cs 

Syrtematuche und leicht- 
' < verständliche Darstellung dei 
Konzeption, Handhabung 
* und Arbeitstechnilc anhand 
zahlreicher Anwendungs¬ 
beispiele • von Klaus Heim 


_ EtvTJ 

Ergänzend findet man dann 
noch einige nützliche Bei¬ 
spiele. die die Arbeitsweise 
von Multiplan in der Praxis 
erläutern. 

Kost: 

Der Schneider PC 
Markt & Technik 1986, 
354 Seiten, 

ISBN 3-89090-415-7 
Preis: DM 49,- 

Rechtzeitig zur Messe in 
Köln, und somit zur offi¬ 
ziellen Vorstellung des neu¬ 
en Schneider PC. präsen¬ 
tiert sich ein weiteres Buch 
zum Premierencomputer. 

Das vorliegende Werk er¬ 
gänzt das Handbuch und 
bietet grundlegende Ein¬ 
führungen in die Betriebs¬ 
systeme MS-DOS und DOS- 
plus. Unter anderem findet 
man hier auch eine kom¬ 
plette Liste aller DOS-Be- 
fehle mit kurzen Erläute¬ 
rungen. 

Ein weiteres Kapitel be¬ 
schäftigt sich mit der Be¬ 
nutzeroberfläche GEM; 
hier worden in erster Linie 
Bedienungshinweise gege¬ 
ben. Der Autor geht u.a. 
auch auf das BASIC 2 des 
Schneider PC ein, doch er¬ 
fährt man hier nichts neues. 
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Fazit: 

Eine gelungene Ergänzung 
zum Handbuch. Die gegebe¬ 
nen Informationen helfen 
aber nur über Anfangs¬ 
schwierigkeiten hinweg. 

K.H. Rollke 

Das Turbo Pascal Buch 

Sybex-Verlag 1986 

285 Seiten 

ISBN 3-88745-608-4 

Preis: 42,- DM 

K.H. Rollkes Turbo Pascal 
Buch ist eine didaktisch her¬ 
vorragende Einführung in 
Turbo Pascal, die für Ein¬ 
steiger und Umsteiger eben¬ 
so geeignet ist, wie als Rat¬ 
geber für erfahrenere Pro¬ 
grammierer. 

In einem leichtverständli¬ 
chen, aber dennoch gehalt¬ 
vollen Stil, der sich von dem 
trockenen Akademikersti 1 
manch anderer Einführung 
angenehm abhebt, wird der 
Leser in wohldosierten Stu¬ 
fen anhand vieler Beispiele 
in die Mysterien von Turbo 
Pascal eingeführt. Dabei 
werden sowohl die Version 
2.0 als auch 3.0 berücksich¬ 
tigt. 

Neben Kapiteln über die 
Sprache selbst sind auch 
Kapitel zu finden, die sich 
mit der Bedienung des Edi¬ 
tors und der Turbo-Toolbox 
(jetzt Turbo-Data-Base") 
beschäftigen. 

Umfangreiche Anhänge mit 
Befehlsbeschrcibungen, Syn¬ 
taxdiagrammen und Fehler¬ 
meldungen sowie ein Litera¬ 
tur- und Stichwortverzeich¬ 
nis runden das angenehme 
Erscheinungsbild dieses 
wirklich sehr empfehlens¬ 
werten Buches ab. 

(Michael Anton) 

J. Seidler 

Das Joyce Praxisbuch 
Signum Computer 
Bücher 1986 
160 Seiten 

ISBN 3-924767-11-4 
Preis: DM 38- 

Gleich zu Beginn ein Hin¬ 
weis: Hauptthema des Joyce- 
Praxisbuches ist die Text¬ 
verarbeitung LocoScript; die 
Möglichkeiten von CP/M, 


Basic oder der Sprache 
LOGO werden nur im 
Rahmen einer 15-seitigen 
Software-Übersicht kurz an¬ 
gesprochen. 

Für Menschen, denen ein 
zusammenhängender Pro- 
salext eher liegt als eine mit 
Bildschirm-Hardcopys, 
Zeichnungen und Befehls¬ 
zeilen durchsetzte Benut¬ 
zeranleitung, ist das Sig¬ 
num-Buch bestimmt eine 
angenehme Lektüre. Zwar 
liefert die 160 Seiten starke 
Broschüre inhaltlich kaum 
Neues, dafür ist sie flüssig 
geschrieben und leicht les¬ 
bar. Zunächst führt der Au¬ 
tor in die Entwicklung der 
Schreibsysteme ein und er¬ 
läutert grundlegende Unter¬ 
schiede zwischen Schreib¬ 
maschine und Textverarbei¬ 
tung. Lin Pluspunkt: gleich 
zu Beginn macht er auf die 
unterschiedliche Benutzer¬ 
führung aufmerksam (Me- 
nue-Befehlseingabe) und 
weist auf die schnelle dyna¬ 
mische Formatierung mit 
der |+|- und |-]-Taste des 
Joyce hin; unverständlicher¬ 
weise bezeichnet er diese 
a b e r a I s „s c h we r e rl e r n b a r", 
obwohl gerade bei Loco¬ 
Script der Übergang zwi¬ 
schen Menue- und Befehls¬ 
steuerung recht behutsam 
vor sich geht. 

Es folgt ein kurzes Kapitel 
zur LocoScript-Arbeitspra- 
xis,das abersehroberfläch¬ 
lich gehalten ist („2.3.3 Ein¬ 
schalten. 2.3.4 Ausschalten 
...”). Etwas ausführlicher 
kommt die Diskettenpraxis 
weg. Recht sinnvoll sind die 
Beispiele für die Benutzung 
der Suchen/Ersetzen-Funk- 
tion, mit der der Autor auf 
bequeme Art und Weise eine 
Tabelle aufbaut und die 
Ktirzelschrei bweise vorstellt. 
Unter der Überschrift „Die 
Kopfinformation" sucht der 
Leser vergeblich nach dem 
Hinweis, daß die Software¬ 
übersetzer bei der Seiten¬ 
numerierung gerade und 
ungerade vertauscht haben 
- ein versteckter Fehler, der 
manchen Arger verursachen 
kann. 

Im 10. und letzten Kapitel 
hat J. Seidler die bis dato 


verfügbare Hard- und Soft¬ 
ware für Joyce und Joyce- 
Plus zusammengetragen. 
Freilich ein schnellebiges 
Thema für ein Buch: Com¬ 
puterzeitschriften liefern da 
aktuellere Informationen. 

(Jürgen Siebert) 

Weiß 

CP/M - ständig im Griff 
Hüthig Verlag 1986, 

91 Seiten, 

ISBN 3-7785-1267-6 
Preis: DM 21,80 

Hier liegt ein Taschenbuch 
vor, das in der Praxis wert¬ 
volle Dienste beim Umgang 
mit dem Betriebssystem 
CP/M leisten kann. Eher als 
Nachschlagefibel gedacht, 
gibt dieses Werk Schnellin¬ 
formationen über die ver¬ 
wendeten CP/M-Komman- 
dos wieder. 

Bei den Erläuterungen zu 
den Befehlen wird auf evtl. 
Abweichungen zwischen 
den verschiedenen CP/M- 
Betriebssystemen (2.2., 3.0. 
etc.) eingegangen. 

Kerler/Rosen: 

Geld & Computer 
Heyne-Taschenbuch 
Verlag 1986, 

142 Seiten, 

ISBN 3-453-47061-1 
Preis: DM 9,80 

Durch ein Hobby Geld zu 
verdienen, womöglich sich 
selbständig zu machen, ist 
der heimliche Traum man¬ 
cher Freizeitprogrammierer, 
und kein vollkommen un¬ 
realistischer dazu - belegen 
die Verfasser dieses Ratge¬ 
bers doch anhand verschie¬ 
dener Erhebungen, daß spe¬ 
ziell der PC-Markt in den 
nächsten Jahren noch mit 
erheblichen Umsatzsteige¬ 
rungen rechnen kann. 
Zunächst im Hardware-, als 
Folge dann auch im Soft¬ 
waresektor. 

Die sich aus diesen opti¬ 
mistischen Prognosen erge¬ 
benden Tätigkeitsbereiche 
werden im Hauptteil dieses 
Taschenbuches vorgestellt. 
Angefangen beim Eröffnen 
eines Computershops über 
das Erteilen von EDV-Nach- 


hilfeunterricht, bis hin zum 
Betreiben eines Schreibbü¬ 
ros oder dem Erstellen von 
Computerhoroskopen und 
-diätplänen, wobei ein An¬ 
spruch auf Vollständigkeit 
natürlich nicht erhoben wird. 
Allgemeine Tips für den 
Einstieg in die Selbstän¬ 
digkeit schließen die Dar¬ 
stellung, ab der man aller¬ 
dings ein umfangreicheres 
Adressverzeichnis noch ge¬ 
wünscht hätte, das den Zu¬ 
gang zu konkreteren Infor¬ 
mationen eröffnen müßte. 

(WUE) 

Fischer 

Mikroprozessoren 
für Anfänger 
Oldenbourg-Verlag 1982, 
190 Seiten, 

ISBN 3-486-27221-7 
Preis: DM 29,80 

Ziel dieses Buches ist es, 
Anfängern die Funktion und 
Arbeitsweise eines Mikro¬ 
prozessors anschaulich dar¬ 
zustellen. 

Grundkenntnisse sind kaum 
erforderlich, das Themen¬ 
gebiet reicht vom Rechnen 
mit Binärzahlen bis hin zum 
Aufbau eines Mikroprozes¬ 
sors. 

Die dabei erarbeiteten 
Kenntnisse können als 
Grundlagen bezeichnet wer¬ 
den; vieles ist uneinge¬ 
schränkt auf andere Pro¬ 
zessoren anzuwenden. 



Mikroprozessoren 
für Anfänger 


Programmieren 

leicht und schnell erlernbar 

R.OIdenbourg Verlag Wien München 


Allerdings ist das hier vor¬ 
liegende Werk bereits 1982 
verfaßt worden und geht 
somit nicht auf die Entwick¬ 
lungen der letzten Jahre ein. 


i 


12 ’86 CPC 107 






I Kurse 


Pascal-Kurs 

Parameter, lokale und globale Größen 


Nachdem das Grundkonzept der Ver¬ 
wendung von Prozeduren und Funktio¬ 
nen in Pascal erläutert wurde, sollen in 
diesem letzten Teil der Pascal- 
Einführung die Möglichkeiten und 
Techniken besprochen werden, die den 
enormen Vorteil prozeduraler Spra¬ 
chen wie Pascal gegenüber anderen 
Sprachen wie BASIC verdeutlichen. 
Nicht umsonst erscheinen auf dem 
Software-Markt immer mehr BASIC- 
Implementationen, denen ein Pascal- 
Mantel übergezogen wurde. 


An dieser Stelle soll die Form einer 
Parameterliste etwas ausführlicher 
betrachtet werden. Im letzten Teil sah 
die der Prozedur bremse mit nur 
einem Parameter ja etwas kläglich 
aus. Hätte diese nicht unterschiedli¬ 
che Verzögerungen bewirken sollen, 
so wäre der Parameter gänzlich Über- 
fliissig gewesen: Er hätte durch eine 
Konstante in der For-Schleife ersetzt 
werden können. In diesem Fall wäre 
der Name bremse in der Prozedurde¬ 
finition und im Aufruf ausreichend 
gewesen: 

PROCEDURE bremse; 

Aufruf; 

bremse; 

Aber im Gegenteil - weit häufiger 
kommt es vor, daß die Übergabe 
mehrerer Parameter angebracht ist. 
Nehmen wir z.B. an, daß eine Pro¬ 
zedur zwecks Erzeugung eines einfa¬ 
chen Balkendiagramms mit unter¬ 
schiedlichen Zeichen „Balken" 
unterschiedlicher Länge ausgeben 
soll. Also werden wir ihr diese zwei 
„Werte” als Parameter übergeben: 

PROCEDURE balken (Zeichen: CH AR; 

anzahl: INTEGER); 

VAR i: INTEGER; 

BEGIN 

FOR i := 1 TO anzahl DO 
VVrite(zeichen); 

W'riteLn; 

END; 

Wie zu sehen ist, entspricht die Form 
einer Parameterliste der einer Varia¬ 
blendeklaration. Entsprechend kön¬ 
nen auch mehrere Parameter des glei¬ 
chen Datentyps, durch Kommas ge¬ 


trennt, hintereinander aufgeführt 
werden. Wenn ein Balken z.B. aus 
zwei sich abwechselnden Zeichen be¬ 
stehen soll, könnte dies folgender¬ 
maßen aussehen: 

PROCEDURE balken2 (Zeichen 1, 

zeichen2: CHAR; 
anzahl: INTEGER); 

Wie hat nun der Aufruf einer solchen 
Prozedur auszusehen? Wie wir wis¬ 
sen, geschieht dies durch die Verwen¬ 
dung des Prozedurnamens und der 
Auflistung der aktuellen Parameter - 
welche, wie bei der Prozedurdefi¬ 
nition, in Klammern eingeschlossen 
und durch Kommas getrennt werden. 

Dabei ist allerdings zu beachten, daß 
die Anzahl, die Reihenfolge und der 
Datentyp der aktuellen Parameter 
mit der Angabe der formalen Para¬ 
meter übereinstimmt. Für das erste 
Beispiel bedeutet dies, daß das für 
den Balken zu verwendende Zeichen 
unbedingt als erster, und die Anzahl 
der zu druckenden Zeichen als zwei¬ 
ter Parameter übergeben werden 
muß: 

balken 25); 

Bei einer Vertauschung dieser zwei 
Parameter würde sich der Compiler 
genötigt sehen, eine Fehlermeldung 
ähnlich wie Datentyp nicht verträg¬ 
lich auszugeben. Dies deshalb, weil er 
bei der Übernahme des ersten aktuel¬ 
len Parameters, der Zahl 25 (Integer, 2 
Byte!), in den von ihm reservierten 
Speicherplatz des ersten formalen 
Parameters, Zeichen (Character, 1 
Byte), Platzprobleme bekommt. So 
viel Intelligenz, die Absicht des 
Programmierers zu erkennen und 
selbständig eine Rückvertauschung 
der Parameter vorzunehmen, besitzt 
der Compiler nicht! Ebensowenig 
würde er bei 

balken2 30); 

(2. Beispiel) den Wunsch erkennen, 
den Balken doch mit nur einem Zei¬ 
chen drucken zu wollen. Hier fehlt 
ihm etwas, was e i m\i Parameter stim¬ 
men nicht überein - oder ähnlich - 
kund tut. Der Aufruf müßte also in 
diesem Fall wie folgt aussehen:, 

balken2 30); 


Diese Einschränkung, die auch bei 
fast allen vordefinierten Standard¬ 
prozeduren gilt, hat - außer dadurch 
den Compiler einfacher zu halten, 
einen weiteren Vorteil: Der Program¬ 
mierer wird nicht verleitet, un¬ 
durchsichtige Universal-Prozeduren 
zu entwickeln, die manchmal zwar 
sehr nützlich, meistens aber schwer 
zu handhaben sind. 

Ist ja soweit alles schön und gut. Der 
Compiler bekommt an Information, 
was er benötigt, die Prozedur gibt ihr 
Bestes - und weiter? 

Gar zu gerne erführe man aber, zu 
welchem Ergebnis eine Prozedur an¬ 
hand der ihr anvertrauten Daten ge¬ 
kommen ist. Handelt es sich bei die¬ 
sem um ein einziges, wobei es einen 
Standarddatentyp wie z.B. Integer, 
Real oder Boolean darstellen muß, so 
ist die Verwendung einer Funktion 
angebracht. 

Wie letztens erwähnt, hat eine solche 
die Fähigkeit, einen Ergebniswert an 
das aufrufende Programm zurückzu¬ 
geben. Die Definition einer Funktion 
gleicht der einer Prozedur - mit drei 
Unterschieden: 

1. Statt mit PROCEDURE wird sie 
mit dem Wort FUNCTION „einge- 
leitet”. 

2. Der Typ des Ergebnisses muß fest¬ 
gelegt werden. 

3. Das Ergebnis muß „zurückgege¬ 
ben” werden. 

Die ersten zwei Punkte werden schon 
in der ersten Zeile einer Funktion er¬ 
ledigt, hier beispielhaft die einer 
Booleschen Funktion: 

FUNCTION is_wahr (ch: CHAR): BOOLEAN; 

Wie bei den Typdefinitionen von Va¬ 
riablen, erfolgt die einer Funktion 
nach ihrem Namen, wobei sich noch 
die optionale Parameterliste dazwi¬ 
schen drängt. Die Rückgabe des Er¬ 
gebniswertes erfolgt durch eine 
Zuweisung desselben an ihren Na¬ 
men im Anweisungsteil der Funktion. 
z.B.: 


is_wahr := ch = \T; 

Was aber, wenn die Rückgabe eines 
Wertes nicht genügt? Als Beispiel 
diene das Vertauschen des Inhalts 
zweier Variablen gleichen Typs. Hier 
kann eine Funktion nicht mehr hel¬ 
fen, wenn auf dauernde Neukodie¬ 
rung der gleichen Anweisungen ver¬ 
zichtet werden soll. Richtig deutlich 
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I Kurse 


wird die Notwendigkeit eines ande¬ 
ren Mechanismus, wenn es sich 
z.B. um die Sortierung eines Feldes 
handelt. 

PROCEDURE tausche (VAR il, i2: INTEGER); 
VAR h: INTEGER (* Hilfsvariable *) 

BEGIN 

h :=il; il := i2; i2 := h; 

END; 

Gibt es im aufrufenden Programm 
z.B. eine Variable n mit dem momen¬ 
tanen Wert 5 und eine zweite Variable 
m mit dem Wert 10, so hat der 
Aufruf 

tausche (n, m); 

zur Folge, daß danach n den Wert 10 
und m den Wert 5 enthält. 

Damit sind aber noch nicht alle Para¬ 
meterarten behandelt, die in Pascal 
möglich sind. Allerdings werden die 
hier folgenden von den wenigsten, 
mir bekannten Implementationen 
auf Mikrocomputern nicht (leider) 
unterstützt, weshalb sie auch nur 
kurz erwähnt werden sollen. Dabei 
handelt es sich um Funktionen und 
Prozeduren als Parameter. Ein Bei¬ 
spiel: Es soll zu einem Wert je nach 
Situation der Sinus bzw. der Cosinus 
desselben Wertes addiert werden. 
Sicherlich kann man diesen einfa¬ 
chen Fall mit den bekannten Mitteln 
ohne weiteres lösen. Dem ist aber 
nicht immer so - und ist folgendes 
nicht eleganter? 

FUNCTION xyz (FUNCTION f: REAL; a: REAL); 
BEGIN 

xyz := f(a) + a; 

END; 

und je nachdem 

b := xyz (Sin, y); 

oder 

b := xyz (Cos, y); 

Die Funktion/stellt hier als formaler 
Parameter wieder einen Platzhalter 
dar - allerdings nicht für einen Wert, 
sondern für eine Funktion, die erst 
durch den aktuellen Funktionspara¬ 
meter beim Aufruf bestimmt wird. Je 
nach dem, ob also die Sinus- oder 
Cosinusfunktion dort angegeben 
wird, wird diese dann entsprechend 
für/in die Funktion xyz eingesetzt. 

Wer sich mit strukturierten Sprachen 
wie Pascal auseinandersetzt, dem 
werden früher oder später die zwei 
Begriffe lokal und global begegnen. 
Was haben diese zwei Begriffe im 





Geltungsbereiche. Die Umrandungen zeigen 
jeweils den Geltungsbereich der entsprechen¬ 
den Größen. 


Aus diesem Grund existieren in Pas¬ 
cal zwei Arten von Parameterüberga¬ 
ben. Die eine haben wir schon ken¬ 
nengelernt: Es ist die Wertübergabe , 
oder auch englisch: call by value. Bei 
dieser Art der Parameterübergabe 
wird der Wert des aktuellen Parame¬ 
ters in den formalen Parameter 
kopiert. Wird z.B. statt einer Konstan¬ 
ten eine Variable im Prozedur-Aufruf 
eingesetzt, so wirken sich in der Pro¬ 
zedur vorgenommene Manipulatio¬ 
nen des Parameters in keiner Weise 
auf den Wert der Variablen aus. Ihr 
Inhalt ist nach Abarbeitung der Pro¬ 
zedur der Gleiche! 

Wollen wir aber, daß solche Manipu¬ 
lationen den Inhalt der im Aufruf ein¬ 
gesetzten Variablen ändern, so muß 
die zweite Art der Parameterüber¬ 
gabe angewandt werden: die Va¬ 
riablenreferenz, bzw. wieder in englisch: 
call by reference\ 

Vorweg auch gleich eine Einschrän¬ 
kung dieser Art der Parameterüber¬ 
gabe, da sie durch die Bezeichnung 
derselben schon angedeutet wird: Im 
Prozedur-Aufruf können für solche 
Parameter, im folgenden VAR- 
Parameter genannt, keine Konstan¬ 
ten mehr eingesetzt werden, es müs¬ 
sen ausschließlich Variablen verwen¬ 
det werden! Begründung: Im Gegen¬ 
satz zum Wertparameter wird hier die 
Adresse der als Parameter verwende¬ 
ten Variablen übergeben. Über diese 
werden dann alle Referenzen inner¬ 
halb der Prozedur getätigt, es wird 
also mit dem Original gearbeitet, und 
nicht mit einer Kopie. Auf diese 
Weise bewirken Zuweisungen zum 
VAR-Parameter innerhalb der Pro¬ 
zedur auch eine Inhaltsänderung der 
als aktuellen Parameter angegebenen 
Variablen. Et voila - eine Prozedur 
kann dem aufrufenden Programm 
mitteilen, was anliegt! 


Doch haben VAR-Parameter noch 
einen weiteren Vorteil, der aber nur 
mit Bedacht und Sorgfalt benutzt 
werden sollte, um ungewollte Seiten¬ 
effekte zu vermeiden. Handelt es sich 
z.B. um ein größeres Feld, welches als 
Eingabeparameter dient und keine 
Werte zurückliefern soll, so kann 
auch dieses anstelle des Wert- 
Parameters als VAR-Parameter über¬ 
geben werden. Der Vorteil: die Ge¬ 
schwindigkeit. Statt hunderte von By¬ 
tes in den formalen Parameter der 
Prozedur kopieren zu müssen, 
braucht nur eine Adresse übergeben 
zu werden. 

Wie wird nun Pascal mitgeteilt, ob es 
sich um einen Wert- oder einen VAR- 
Parameter handelt? Ebenfalls in der 
Parameterliste. Hier z.B. eine Tau- 
sche-Prozedur für ganze Zahlen: 
Zusammenhang mit der Program¬ 
mierung zu bedeuten? 

Wer schon einmal ein größeres Pro¬ 
gramm in BASIC geschrieben hat. 
wird dabei sicherlich auch in die Ver¬ 
legenheit gekommen sein, bald keine 
vernünftigen Namen mehr für seine 
Variablen gefunden zu haben. 
Warum? 

Dazu folgendes: Es hat sich z.B. ein¬ 
gebürgert, für eine Laufvariable den 
Bezeichner i zu verwenden. Handelt 
es sich um eine geschachtelte Struktur, 
so folgt als nächstes der Name/ dann 
k usw. Nun hat man innerhalb einer 
solchen Schleife wiederum den 
Aufruf eines Unterprogrammes, in 
dem sich wiederum eine Programm¬ 
schleife befindet - und in dieser wird 
wiederum ein Unterprogramm aufge¬ 
rufen, in dem sich wieder eine... 
Auch ist es nicht gerade leicht, Unter¬ 
programme aus anderen Programmen 
zu übernehmen, die man hier nun 
wieder gebrauchen kann. Dazu muß 
genau analysiert werden - nicht was, 
sondern wie und mit welchen Variab¬ 
len dies getan wird. Sie merken, 
worauf ich hinaus will, gelle? Wie Sie 
wahrscheinlich aus eigener Erfah¬ 
rung wissen, bleibt ein etwas 
merkwürdiges Verhalten des Pro¬ 
grammes oft nicht aus, wenn über sol¬ 
che Schachtelungen, Unterprogram¬ 
men und den dabei verwendeten Va¬ 
riablen nicht genauestens Buch 
geführt wird. „Kann ich hier nun wie¬ 
der i verwenden - oder muß eine neue 
Variable her? Und wenn ja, wie darf 
ich sie benennen?” All das kostet Zeit, 
und wenn man es professionell be¬ 
treibt, auch Geld. Diese Schwie¬ 
rigkeiten bringt BASIC mit sich, weil 
in dieser Sprache alle Variablen den 
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Leicht hat er es sich nicht gemacht, 
und viele dachten: „Was der vor hat, 
das geht gar nicht." Thomas Vervost, 
Autor des Profi Painter CPC, hatte sich 
ausgerechnet die stärksten Grafik¬ 
programme als Konkurrenz und Maß¬ 
stab ausgesucht. Sein ehrgeiziges Ziel: 
Er wollte ein Programm schreiben, 
das eigentlich unmöglich ist - den 
Profi Painter CPC. Einfach zu bedienen 
sollte es sein, schnell sollte es sein, 
flexibel sollte es sein. Kurz, seinen 
großen Vorbildern aus der 32Bit-Welt 
möglichst wenig nachstehen. Nur 
eben auf einem 8Bit-Rechner. Und das 
Ergebnis? „Die Geschwindigkeit und 
die vielen Möglichkeiten, die dem 
Anwender das Arbeiten erleichtern, 
machen den Umgang mit Profi Painter 
CPC zu einem wirklichen Vergnügen." 
Das schrieb CPC International im Test. 
Der .Aktuelle Softwaremarkt' schloß 
mit dem Fazit: „Der Firma DATA 
BECKER sowie dem Autor des Pro¬ 
grammes ist nur zu gratulieren." Den 
einen fasziniert die Einfachheit der 
Bedienung über Symbole wie Bleistift, 
Farbeimer, Lineal oder Sprühdose, 
den anderen die Leistungsfähigkeit, 
die das Programm bietet: 

• Pinsel mit verschiedenen Strich¬ 
stärken 

• Sprühdosenfunktion für Farben und 
Muster 

• Ausschneiden und Verschieben 
beliebiger Bildausschnitte 

• Invertieren, Rotieren, horizontales 
und vertikales Drehen von Objekten 

• optionale Rasterunterlegung 

• problemloses Zeichnen von Geraden, 
Rechtecken, Kreisen, Ovalen usw. 

PROFI PAINTER CPC DM 99- 


Dazu kommt das ausführliche deut¬ 
sche Handbuch, das leichtverständlich 
in den Umgang mit dem Programm 
einführt. 

Nur eine Frage blieb bei den Profi- 
Painter-Besitzern dennoch offen: „Wie 
hat Thomas Vervost das gemacht?" 
Die Antwort darauf gibt er selbst: mit 
dem großen Grafik-Buch zum CPC. 
Zusammen mit Jürgen Steigers, dem 


ItMftn 
Verven 

Das große 

CRAFIKBUCH 

zum 

CPC 


Co-Autor von 6128 Intern, fand sich ein 
Top-Team in Sachen Schneider-Grafik: 
„Wir wollten das Schneider-Grafik-ßuch 
schlechthin machen. Ein Buch, in dem 
Profis Neues lernen und das aus Ein¬ 
steigern Profis macht." Aus diesem 
Anspruch ergibt sich schon fast die 
Gliederung. Der erste Teil widmet sich 
ausschließlich der Grafikprogrammie¬ 
rung in BASIC. Autoren und Leser 
entwickeln gemeinsam ein einfaches 
Malprogramm. Auf diese Weise erhält 
man nicht nur ein nützliches Utility, 
sondern es werden wichtige Grund¬ 
lagen vermittelt. Dann kommt die 
Spezialitäten-Abteilung: Business- und 
Vektorgrafik sind hier genauso 
Themen wie Peripheriegeräte zum 


Thema Grafik Daß Jürgen Steigers zu 
Recht durch das 6128 Intern als CPC- 
Kenner bekannt wurde und sich auch 
durch seine „Bastelgags" in der DATA 
WELT als Hardwarespezialist etablierte, 
zeigt sich im nächsten Kapitel. Hier hat 
er eine gehörige Portion Arbeit gelei¬ 
stet: er erklärt nicht nur, wie ein Light- 
pen funktioniert, sondern anhand von 
Schaltplänen und exakten Bauanlei¬ 
tungen auch gleich, wie man so etwas 
selber bauen kann. Der große Maschi¬ 
nensprache-Teil schließlich ist ein 
Leckerbissen für Grafik-Freaks und 
solche, die es werden wollen. Neben 
allen Einsprungadressen der Grafikrou¬ 
tinen finden Sie auch eine komplette 
Abhandlung über GSX. Sie wissen 
nicht, was GSX ist? Keine Sorge, so 
geht es den meisten, denn bisher 
wurde diese grafische System-Erweite¬ 
rung noch nie wirklich dokumentiert. 
Lassen Sie sich von Thomas Vervost 
und Jürgen Steigers zeigen, wie Sie 
unglaubliche Grafiken auf Ihrem CPC 
zaubern können. Übrigens: Alles, was 
Sie hier gelesen haben, ist natürlich 
nur ein kleiner Ausschnitt dessen, was 
Sie in diesem Buch finden werden. 
Kunststück, bei fast 500 Seiten... 

Das große Grafikbuch zum CPC 
Hardcover, ca. 500 Seiten, DM 49,- 
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gleichen Geltungsbereich haben, glo¬ 
bal sind: An jeder Programmstelle, 
Unterprogramm oder nicht sind sie 
zugänglich und manipulierbar - ge¬ 
wollt oder nicht! 

Wie unterscheiden sich nun struktu¬ 
rierte Sprachen wie Pascal von 
BASIC? Nun, es besteht die Möglich¬ 
keit, den Geltungsbereich von Va¬ 
riablen - und nicht nur von diesen - 
einzuschränken, wovon in den Bei¬ 
spielen der Einführung auch Gebrauch 
gemacht wurde. Denn in der Regel 
führt eine Prozedur oder eine 
Funktion interne Berechnungen 
durch, wozu in den meisten Fällen für 
diesen Zweck Hilfsvariablen benötigt 
werden. Dies alles ist aber im allge¬ 
meinen für die Außenwelt von 
äußerst geringem Interesse. Als Bei¬ 
spiel diene die Prozedur tausche mit 
ihrer Hilfsvariablen h. Denn davon, 
daß folgende zwei Anweisungen 
nicht zum gewünschten Ziele führen, 
können Sie sich leicht selbst 
überzeugen: 

11 := i2; 

12 := il; 

Die Variable h wird also dringendst 
benötigt. Angenommen, Pascal hätte 


diesbezüglich die gleiche Eigenschaft 
wie BASIC, wir benötigten aber auch 
im aufrufenden Programm eine Va¬ 
riable h und benutzten die Prozedur 
tausche , nachdem h einen Wert zuge¬ 
wiesen bekam. Nach dem Aufruf der 
Prozedur könnten wir h nicht mehr 
verwenden, da wir nicht wissen, was 
sie enthält. Wir müßten entweder tau¬ 
sche oder unser Programm umschrei¬ 
ben. Gerade bei der Verwendung von 
Standardfunktionen bzw. Prozedur¬ 
oder Funktions-Bibliotheken wird 
dieses Problem groß, da diese nicht 
ohne großen Aufwand umgeschrie¬ 
ben werden können. Zu diesem 
Zweck besteht in Pascal oben ge¬ 
nannte Möglichkeit zur Einschrän¬ 
kung des Geltungsbereiches (engl.: 
scope ), die dafür sorgt, daß bei¬ 
spielsweise prozedurinterne Variab¬ 
len wie X, Y oder Z mit anderen Va¬ 
riablen gleichen Namens nicht kolli¬ 
dieren, diese also lokal zu dieser 
Prozedur sind. Konkret bedeutet dies, 
daß die Änderung einer lokalen Va¬ 
riablen keine Änderung einer gleich¬ 
namigen Variablen außerhalb dieser 
Prozedur oder Funktion bewirkt! Sie 
genießt ein Schattendasein, bis „ihre” 
Prozedur aufgerufen wird, und ver¬ 


schwindet mitsamt ihrem Wert wie¬ 
der, wenn die betreffende Prozedur 
abgearbeitet worden ist! 

Wie geht dieses? Wie anhand der ge¬ 
fallenen Beispiele zu sehen ist, wird 
eine Variable lokal zu einer Prozedur 
bzw. Funktion, wenn sie innerhalb 
derselbigen vereinbart wird (s. h in 
tausche.). Dies gilt außer für Variab¬ 
len ebenso für Konstanten, Datenty¬ 
pen und auch Prozeduren und Funk¬ 
tionen. So wären z.B. mehrere Proze¬ 
duren Namens tausche in einem 
Programm möglich - vorausgesetzt, 
sie befinden sich nicht im selben Gel¬ 
tungsbereich, sondern sind jeweils 
lokal zu unterschiedlichen, über¬ 
geordneten Prozeduren. Als extremes 
Beispiel diene die Möglichkeit (wenn 
überhaupt sinnvoll), ein ganzes 
Programm als Prozedur in ein ande¬ 
res Programm ohne große Umschrei¬ 
berei „einzubinden”. In diesem Fall 
sind alle Größen, von den Konstan¬ 
ten bis zu den Prozeduren, nur inner¬ 
halb dieser neuen „Prozedur” be¬ 
kannt. Das sie umschließende 
Programm kennt lediglich den Na¬ 
men dieser Prozedur und die zu über¬ 
gebenden Parameter... 

(MC) 
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HABIL 



für 464-664-6128 


Sind Sie es leid, sich bei der monatlichen Abrechnung in 
einem Berg von Quittungen und Zetteln wiederzufinden? 
Dann sollte Ihnen unser Programm zur Erstellung von 
Haushaltsbilanzen aus der Patsche helfen können. 
„HABIL” bietet folgende Features: 

- Komfortable Menuesteuerung 

- Erstellung von Arbeitskopien 

- Grafische Ausgabe 

- Kontenverwaltung 

- Eröffnungs- und Schlußbilanz 

- Finanzsituationsbewertung 

Wir bringen das Programm rechtzeitig zum Jahreswech¬ 
sel, so daß Sie nach kurzer Einarbeitungszeit 1987 schon 
komplett bearbeiten können. 

Die Bedienung erfolgt über die Cursortasten und wird 
durch ein Help-Window erleichtert. „HABIL” erklärt sich 
selbst und benötigt keine besondere Beschreibung. 

Hinweise: 

Da das Programm selbst Zeilen erzeugt, müssen unbedingt 
die vorgegebenen Zeilennummern eingehalten werden. 
Also bitte kein RENUMÜ! 

Anwender, die noch keinen Drucker besitzen, sollten Zeile 
6700 ersatzlos streichen. Die Druckroutinen sind für einen 
Epson-kompatiblen Drucker ausgelegt. Da es sich hierbei 
jedoch nur um einfache PRINT-Anweisungen handelt, 
dürfte das Programm mit jedem Drucker arbeiten. 

664- und 6128-Besitzer ändern bitte die Zeilen 1310, 3110, 
7490 und 7510 wie im Zusatzlisting angegeben. 

(K.H. Walter/TM) 


Zusatzlisting 


1 * xx AENDERUNGEN EUER CPC 664/6128 xx 

1310 LOCATE 2,2:RESTORE 1340:FOR n=l TO 7:READ txt 

* 

3110 LOCATE 9,8:PR I NT "HABIL ";:P0KE &B1C8.2 
7490 RESTORE 7500 : i =S<B65E 

7510 READ txt® :IF txt*="start"THEN END:ELSE IF txt 
* =">" THEN i=&B686:GOTO 7510 


Listing 




1000 

’xxxxxxxxxxxxxxxxxxxxxxx 

r 577 3 

1005 

’ 


» * 

[ 1043 

1010 

’ x x 

HABIL VI.1 

X X 

[998 3 

1015 

* xx 


X X 

[ 1043 

1020 

’ * X 

geschrieben von 

X X 

[12533 

1025 

* X X 

K.-H.Walter 

X X 

[18103 

1040 

’ XX 


X X 

[ 1043 

1045 

* X » 

(c)1986 

X X 

[576 3 

1050 

• xxxxxxxxxxxxxxxxxxxxxxx 

[5773 

1070 

y 



[1173 

1080 

* Pra 

gammstart nach Abbruch! 

GOTO 1111 [33383 


(ENTER) 

1090 ’ [117] 

1100 GOSUB 6590 C9333 

1111 GOSUB 3690 [11823 

1120 » C1173 

1130 ’xxx HAUPTMENUE *** [9543 

1140 « 1117 3 

1150 POKE &B1C8,2:W(NDOW#0,1,80,1,25:SPEED [20353 
KEY 10,1 

1160 LOCATE 2,4:PR I NT SPC(59) [20743 

1170 WIND0W#3,2,7i,S,23:CLS#3 [11473 

1180 LOCATE 24,25:PR INT SPC(56>;:LOCATE 24 [26003 
,25 

1190 IF dl<d3 THEN PRINT "R3CKBLENDE:"ta;m [41783 
on$;jah;" ";:G0SUB 4010 

1200 PRINT "HABIL";jah-1900;"NR."jversion [21593 
1210 GOSUB 6040:IF dl=101 THEN mo=13 C17073 

1220 txt*=INKEY®:IF txt®=CHR®(13) THEN 135 C19493 
0 

1230 IF txt®=CHR*(242) THEN mel=me1-1:IF m C2769J 
el<1 THEN mel=7 

1240 IF txt*=CHR®(243) THEN mel=mel+l:!F m C34933 
el>7 THEN mel=l 

1250 IF txt$=CHR®(240) THEN ik=24 [19383 

1260 IF txt®=CHR®(241) THEN ik=0 [18033 

1270 INK 0,ik:BORDER ik:INK 1,24-lk [22153 

1280 ’ [1173 

1290 ’>> MENUE ANZEIGEN << [16343 

1300 » [1173 

1310 LOCATE 3,2:RESTORE 1340:FOR n=l TO 7: [20403 


READ txt® 

1320 IF mel=n THEN PRINT CHR»(24)" "txt$" C36223 
"CHR®(24); ELSE PRINT " "txt®" 

1330 NEXT n:GOTO 1220 [12493 

1340 DATA Datum,Kontof3hrung,Auszug,Stand, [39953 
BIlanz,Save,Ende 

1350 SPEED KEY 25,1:0N mel GOSUB 3690,4080 [43713 


,2940,2850,1400,2520,8170 

1360 GOTO 1140 [3113 

1370 * C1173 

1380 ’xxx OPTION BILANZ xxx [10723 

1390 ' (1173 

1400 GOSUB 6080:GOSUB 7030 [18223 


1410 IF dl = 101 THEN txt8® = "ER\FFNUNGSBILAN [77153 
Z" ELSE IF ta=tal THEN txt8$ =" ABSCHLUß ILA 
NZ" ELSE txt8®= M ZWiSCHENBILANZ" 

1420 PRINT txt8*;" ";mon®;jah-1900 [18933 
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i Programme 


1430 POKE & 1 BIC 8 ,2 

1440 IF kf1ag=3 THEN 1760 

1450 • 

1460 ’>> BILANZKONTEN ERMITTELN << 

1470 ’ 

1480 kf1ag=3 
1490 GOSUB 3420 

1500 FOR 1=0 TO 3:FOR n=0 TO 3 

1510 bi<1,n)=0:NEXT n, i 

1520 FOR 1=1 TO 96 

1530 IF 1>16 AND i<33 THEN 1560 

1540 !F tkonto(1,0)>0 THEN bl(1,1)= bi<1,1> 

+tkonto(1,0) ELSE bi(1,2)=bi(1,2)+ABS(tkon 

to(i, 0 )) 

1550 GOTO 1570 

1560 IF tkonto(1,0 )>0 THEN b1(2,1)=b1(2,1> 
+ tkonto(1,0) ELSE b1(2,2)=b1(2,2)+ABS(tkon 
to(i, 0 )) 

1570 NEXT 

1580 IF bi<2,2)>bl(2,1) THEN n = bi(2,2)-bi ( 
2 ,l):bi(l, 2 )=bi(l, 2 )+n:bi( 2 , 2 )=bi( 2 , 2 )-n:b 
1 ( 1 , 0)=1 

1590 bi(3,1>=bi(2,1)+bi (1,1) 

1600 bl(3,2>=bl(2,2)+bi£1,2) 

1610 bi( 1 ,3>=bi( 1 , 1 )-bi( 1 , 2 ) 

1620 IF b1(1,3)<0 THEN bi(1,3)=ABS<b1(1,3) 
):bi< 2 , 0 ) = 1 

1630 bi(2,3)=bi(2,1)-bi(2,2):IF bi<2,3><0 

THEN bl(2,3)=0 

1640 bi(3,3)=bi(3,l)-bi(3,2) 

1650 IF bl(3,3)<0 THEN bi(3,3)=ABS(bi(3,3) 
):bi(3, 0)=1 
1660 ’ 

1670 '>> MAXIMALWERT FESTSTELLEN << 

1680 ’ 

1690 ma=9:FOR n=l TO 3:F0R 1=1 TO 3 
1700 IF bi (n, i )>0 THEN ma = MAX(ma,b1(n, 1)) 
1710 NEXT i,n 

1720 h=I NT <ma/100):IF h<l THEN h=l ELSE IF 
h>10 THEN h=10 
1730 * 

1740 ’>> BILANZ-GRAFIK ZEICHNEN << 

1750 ’ 

1760 IF sym< >6 THEN GOSUB 6080 
1770 WIND0W#3,2,71,4,23 

1780 FOR 1=1 TO 3:L0CATE#3,3,10+1:PRINT#3, 
STR 1NG#(39+1,143)CHR*(215):NEXT 
1790 FOR 1=1 TO 4:L0CATEK3,2+1,13+1: PR I NT# 
3,CHR#(213>STRING*(42,143)CHR*(215>:NEXT 
1800 FOR 1 = 1 TO 3:LOCATE#3,6+1,17+i:PR INT# 
3,CHR#(213)STR 1NG* <43-1,143):NEXT 
1810 i=2:L0CATE#3,47,i:PR 1NT#3,CHR*(24>CHR 
*(150)STR ING*(21,154)CHR*(156>CHR$<24) 

1820 RESTORE 2450:FOR py=l TO 3:F0R px = i T 
0 3 

1830 READ txt*,txtl*:IF px=3 AND py=3 AND 
bi(3,0)=1 THEN READ txt*,txtl* 

1840 IF py=1 AND px=3 AND bi(2,0)=l THEN t 
x t* = "KS": txt1S="Kurzf . Schulden" 

1850 IF b1(py,px)>0 THEN L0CATE#3,py*12+1, 
17+px:PRINT#3,CHR*(24>;US ING"###### . ##";bi 
(py,px);:PR I NT#3,CHR$(24) 

1860 IF b1(py,px)=0 THEN 1970 
1870 * 

1880 ’>> GRAFIK-BLOECKE SETZEN << 

1890 ’ 

1900 FOR n=0 TO I NT((h*b1(py,px)>/ma> 

1910 L0CATE#3,(12*py)+(2*px)-6,10+(2*px)-n 
:PRINT#3,CHR*(207)STRING*(6,127) 

1920 IF n=0 THEN L0CATE#3,(12»py)+(2*px)-7 
,10+(2#px)-n:PRlNT#3,CHR*(215)CHR*(221) 
1930 NEXT n 

1940 1 = i +1:L0CATE#3,47,i:PR[NT#3,CHR*(24)C 
HR*(149)" "txt*" "txtl*SPC(17-LEN(txtl*))C 
HR*(149)CHR*(24) 

1950 L0CATE#3, (12*py>+(2*px)- 6 ,10+(2*px)-n 
:IF n-(2»px)<0 THEN PR INT#3,STR ING*(6,207) 
CHR*(24)CHR*(223)CHR*(24) ELSE PR1NT#3,CHR 
*(24)STR ING*(6,207)CHR*(24)CHR*(223) 

1960 LÜCATE#3,(12*py)+(2#px)-5,11+(2*px)-n 
;PR INT#3,txt* 

1970 NEXT px, py 

1980 IF 1=2 THEN i = 1 +1: L0CATE#3 t 47,1:PR I NT 
#3,CHR*(24)CHR*(149)" Keine Eintragungen 
"CHR*(149)CHR*(24) 

1990 L0CATE#3,47, 1 +1:PR INT#3,CHR*(24)CHR*( 


C 660 ] 

[1444] 

[117] 

[1606] 

[117] 

t 547 ] 

[ 1021 ] 

[624] 

[897] 

[557] 

C1003] 
[3719] 


£385] 

[3725] 


[350] 

[4233] 


[1456] 
C1498] 
[826] 
[3001] 

[2490] 

[1167] 

[2417] 

[117] 

[3289] 

[117] 

[936] 

[14923 

[4233 

[45563 

[1173 
[15453 
(1173 
[10513 
C 884 3 
£37963 

[34153 

[44923 

[49633 

(25723 

[44883 

(52743 

[3850] 


£ 10283 

[117] 

£2160] 

£1173 

[25653 

[40963 

[29123 

[366 3 
£53643 


[81013 


[24803 

(6723 

£56183 


£54233 


147)STR ING*(21,154)CHR*(153)CHR*(24) 

2000 IF 1=3 THEN 2210 
2010 * 

2020 ’>> LIQU1DITAET u. FINANZIERUNG << 
2030 ’ 

2040 1 = 1+3:LQCATE#3,52,1: PR INT#3,txt*;" =" 
fUSING"######.##";bi(3,3);:PR!NT#3," DM" 
2050 IF b1(1,0) = 1 THEN L0CATE#3,52,i +1:PR I 
NT#3,CHR*(24)"-TL-AG-pr 3 f f en!-"CHR*(24) 
2060 IF bi(3,0)=l OR b1(2,0)=0 THEN bi(0,l 
)=-1:GOTO 2090 

2070 bi(0,1)=ROUND(INT(bi(3,3))/1 NT(bI(1,3 
) ), 1 > 

2080 IF bi(0,i)>2 THEN bi(0,l)=-l 

2090 1=1+2:LQCATE#3,52,i:PRINT#3,"Liquldit 

£t 

2100 IF bi(0,1)<=0 THEN PR INT#3,"1st":i = I + 
1:L0CATE#3,52,1 

2110 IF bi(0,1)=-1 THEN IF bi(3,0)=l THEN 
PRINT#3,"nicht gesichert!" ELSE PRINT#3,"g 
esiohert!" 

2120 IF b1(0,1)=0 THEN PR 1NT#3,"h!chst kri 
tisch ! " 

2130 IF bi(0,1)>0 THEN PR INT#3,bi(0,1) 

2140 IF bi(3,i)=0 OR bi(2,3)=0 THEN 2210 
2150 bl(0,0)=ROUND(bI(l,l)/bi(2,3),l) 

2160 i=1+2:L0CATE#3,52,1:PRINT*3,«Finazier 
ung "; 

2170 IF bi(0,0)>0 THEN PR INT#3,b1(0,0) 

2180 L0CATE#3,52,1+1 

2190 IF bl(0,0)<0.5 THEN IF bl(0,0)=0 THEN 
PRINT#3,"sehr sch 1 echt!"ELSE PRINT#3,"ger 
i n g ! " 

2200 IF bi(0,0)>=0.5 THEN IF bi(0,0)>l THE 
N PRINT#3,"gut!" ELSE PRINT#3,"m£~1g!" 

2210 IF i>3 AND bl(l,0)=0 THEN GOSUB 6020 
ELSE GOSUB 5990 

2220 txt*=INKEY*:IF txt*="" THEN 2220 
2230 IF i>3 AND bi(l,0)=0 AND txt*=CHR*(22 
4) THEN 7640 

2240 IF txt*OCHR* (13) THEN 2220 
2250 » 

2260 ’>> JAHRES-ABSCHLUSS << 

2270 * 

2280 IF d1<>1231 OR jah=1999 OR bi(l,0)=l 
THEN RETURN 

2290 LOCATE 2,4:PRINT SPC(59):WINDOW#3,2,7 
1,5,23:CLS#3 

2300 CLS#3:GOSUB 6010:GOSUB 3370 

2310 PRlNT#3:PR1NT#3,"Nachfolgend kann ei 

ne neue" 

2320 PRINT#3:PRINT#3,"Arbeitskopie erstell 
t werden." 

2330 PR I NT#3:PR I NT #3:PRINT#3,"Bitte bestft 
1 gen!" 

2340 POKE &B1C8.2 

2350 txt*=INKEY*:IF txt*="" THEN 2350 
2360 IF txt*=CHR*(127) THEN RETURN 
2370 IF txt*=CHR*(13) THEN 2380 ELSE 2350 
2380 CLS#3:GOSUB 6080:GOSUB 7030 
2390 PRINT"ABSCHLUß" jah:POKE &B1C8.2 
2400 GOSUB 3620 

2410 FOR i=0 TO 1152:mkonto(1)=0:NEXT 
2420 FOR 1=1 TO 96:mkonto(i+1152)=tkonto(i 
, 0) 

2430 tkanto(n,2)=0:tkonto(n,3)=0:NEXT 
2440 jah= jah+1:GOTO 7310 

2450 DATA EK,Eigenkapita1,AG,Ausgaben/Kost 
en,KA r Kasse/Bank 

2460 DATA LS,Langf.Schu1 den,TL,Ti Igung/Rat 
en,FK,Fremdkapital 

2470 DATA RV,"Re 1nverm!gen",AW,Gesamtaufwa 
nd,GH,Guthaben 

2480 DATA FF,Frendf1nanz1erung 
2490 ’ 

2500 "**» OPTION DATEI AUFZEICHNEN #»* 

2510 ’ 

2520 CLS#7:GOSUB 7030:PR INT"DATE1 AUFZEICH 
NEN" 

2530 WINDOW#0,2,35,5,23 
2540 PRINT"]BERTRAGUNGSDATEN" 

2550 PRINT STR ING*(17, 154):PRINT 
2560 PRINT 

2570 IF d 1 <d3 THEN PRINT CHR*(24)" R]CKBLE 
NDE "CHR*(24); ELSE PR 1 NT"Tagesdatum"; 

2580 PRINT ":";ta;mon*;jah 


[1008] 

£117] 

£2733] 

£117] 

£3966] 

£4935] 

£2279] 

£1637] 

£999) 

£4662] 

£2335] 

£7185) 


£2526) 

[2067] 

[1343] 

£2307] 

£3143) 

£1539) 

£519) 

£6369) 


£5184) 

£3048) 

£1967] 

£3786] 

£12451 
El 17] 
[2095] 
[117] 
£3834) 

£4373) 

£851] 

£3374) 

£29091 

£29463 

[6603 

£19093 

£26033 

E17693 

£8353 

[25203 

£11883 

£22373 

£20383 

£12713 

£5593 

£27693 

£4733) 

£3397] 

£2133] 
[117] 
[2041] 
[117] 
£805 3 

£768 3 
[21903 
£17293 
£3613 
[43123 

[16753 
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In fünfundsiebzig verschiedenen Höhlen hat 
ein bößer Geist die Fragmente des zer¬ 
schmetterten Schwertes Anduril versteckt. 
Sind Sie geschickt genug alle Teile einzu¬ 
sammeln? Ein kniffiliges Geschicklichkeits¬ 
spiel. Joystick und Tastatursteuerung. 


Auf Mörderjagd im alten Schloß. War wieder 
der Butler der Mörder, oder sollte etwa der 
Hausarzt seine Finger im Spiel haben. Sie 
sammeln Indizien und jagen den kaltblütigen 
Killer. Denksport at it’s best. 


Auf der neuen GAMEBOX finden Sie pro 
Ausgabe zwei Klasse Spiele aus dem Berei¬ 
chen Strategie-, Action-Adventure und Reak¬ 
tionsspiel. 

Die GAMEBOX kostet pro Ausgabe 19,- DM, 
als Kassette bzw. 29,- DM als Diskette zzgl. 
3,- DM Porto und Verpackung. Sie können 
die GAMEBOX per Vorkasse oder Nachnah¬ 
me bestellen. Im Falle der Nachnahme kom¬ 
men die entsprechenden Nachnahmegebüh¬ 
ren hinzu. 

Bitte Bestellkarte benutzen 


Dungeon 

Doom 



Ball 

Hunter 



Folgen Sie dem Abenteurer Terry McStyle in 
die unterirdischen Labyrinthe des Dungeon 
Doom’s. Eine Welt voller phantastischer We¬ 
sen erwartet Sie. Ein Icon-gesteuertes Grafik- 
Abenteuer. Joystick und Tastatursteuerung. 


Barney Ballhunter, der König der Hammer¬ 
schwinger, hat es nicht leicht. Aber vielleicht 
wollen Sie ihm bei seiner Jagd nach den 
Gasballons helfen? Also, in die Hände ge¬ 
spuckt, und den Hammer schwingen. 100% 
Maschinencode-Action. Joystick und Tasta¬ 
tursteuerung. 


DMV-Verlag 

Fuldaer-Straße 6 ■ 3440 Eschwege ■ Telefon (056 51) 87 02 
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I—Programme 



2590 GOSUB 2810 

2600 PR 1 NT:PR I NT"Dateiname: ";txt0$ 

2610 PR 1 NT:PR INT"DATENTRÄGER HAB IL"M1D*(ST 
R*<jah-1900),2,2)" EINLEGEN !!!" 

2620 POKE &B1C8, 2:G0SUB 6010:tnel = l 

2630 txt$=INKEY$:IF txt$="" THEN 2630 

2640 IF txt* = CHR$ C127) THEN 2800 

2650 IF txt*OCHR$ C13) THEN 2630 

2660 GOSUB 6080:GOSUB 3370:FOR i=l TO 20:P 

R1 NT:NEXT:s f1a g = 1 

2670 PR I NT"M ! g 1 1 che alte Datei wird gelisc 
ht! ":PR INT: iERA,@txt0*:PR 1 NT:PR INT 
2680 mel=7:OPENOUT " ! Hab 1I":CLOSEOUT 
2690 OPENOUT ”!"+txt0$ 

2700 PRINT " "txt0*" wird auf gezeichnet! 

PR I NT:PR I NT:PR I NT 

2710 PR 1 NT#9,dflag;dl;d2;d3;jah 

2720 FOR 1=1 TO 96 

2730 PRINT#9,konto*(1) 

2740 FÜR n= 1 TO 3 
2750 PRINT#9,tkonto(i,n) 

2760 NEXT n,1 

2770 FOR 1=1 TO 1248 

2780 PRINT#9,mkonta(i) 

2790 NEXT 1:CLOSEOUT:FOR 1=1 TO 20:PRINT:N 
EXT 

2800 POKE &B1C8,2:WINDQW SWAP 0,3:RETURN 
2810 txt0*="DAT"+MlD* (STR* ( jah-1900) ,2,2) + 
"N"+MID*(STR*(Version),2, 1 > + ".TXT":RETURN 
2820 • 

2830 ’«*» OPTION KONTOSTAND #*» 

2840 * 

2850 GOSUB 7030 

2860 IF dl = 101 THEN txt8$ = "ERXFFNUNGSBESTA 
ND" ELSE txt8*="INVENTUR" 

2870 PRINT txt8*;:IF dl>101 THEN PRINT" "+ 

man*;jah-1900 

2880 POKE &B1C8.2 

2890 IF kf1ag=2 THEN 3040 

2900 kflag=2:G0T0 2980 

2910 ' 

2920 ’*** OPTION KONTOAUSZUG *»# 

2930 ’ 

2Ö40 IF dl=101 THEN m©l=4lGQßUB 4010 iSETUR 
N 

2950 GOSUB 7030:t x 18* = "KONTOAUSZUG":PR I NT 

txt8* :POKE &B1C8,2 

2960 IF kf1ag=1 THEN 3040 

2970 kf1ag=1 

2980 GOSUB 6080:GOSUB 3420:GOSUB 3510 

2990 tkonto(0,1)=n 

3000 IF kflag=2 THEN 3030 

3010 GOSUB 3560:GOSUB 3510 

3020 tkonto(0,0)=tkanto(0,l)-n 

3030 IF kfIag=2 THEN GOSUB 3620 

3040 IF sym<>6 THEN GOSUB 6080 

3050 BORDER 3:INK 0,3:INK 1,26 

3060 UIND0W#3,6,64,7,22:PR1NT#3,CHR*(24):C 

LS #3 

3070 FOR 1 = 1 TO 15 STEP 2:L0CATE#3,1, i:PR I 
NT#3, CHR*(231)CHR*(149):L0CATE#3,58, 1:PR IN 
T#3,CHR*(149>CHR*(231>" "CHR*(149):LOCATE# 
3,58, 1 + 1:PR INT#3,CHR*(149):NEXT 
3080 LOCATE#3,2,4:PRINT#3,CHR*(151)STRING* 
<55, 154)CHR* <157) 

3090 WIND0W#3,8,62,i1,21:PR I NT CHR*(24) 
3100 GOSUB 3370 


[8493 

[20473 

(40743 

[15773 
(19573 
[22463 
[12993 
[34673 

(55503 

[25343 
[10563 
[53873 

C 2272 3 

[5573 

[13943 

(8013 

[24953 

(5723 

[6443 

(21983 

(25113 

(15353 

[51023 

[1173 
(8663 
(1173 
(8213 
[31313 

[31013 

[6603 
[11953 
[10473 
[1173 
[14483 
[1173 
[27693 

[30783 

(11783 
[5493 
[20153 
[11843 
[11893 
[15133 
£2024 3 
C12383 
C10513 
( 20013 
[26853 

[73403 


[33553 

[16513 
[9673 


3110 LOCATE 5,8:PR I NT "HABIL ";:POKE & 
B1C8,2 

3120 LOCATE 9,9:IF kflag=l THEN PRINT CHR* 
(24)” KONTOAUSZUG "CHR*(24); 

3130 IF kf1ag=2 THEN PRINT CHR*(24>" -- KO 
NTOSTAND -- "CHR*<24>; 

3140 PRINT SPC(5);man*;jah-1900:LOCATE 54, 
9:PRINT"BiId#" 

3150 IF kf1ag = l THEN LOCATE 9,22:PR INT"A11 
er Saldo:";US ING"#######.##";tkonto(0,0);: 
PRINT” DM" 

3160 ze = l:zflag=0:bi1d=l:LOCATE 60,9:PRINT 
"1" 

3170 FOR 1=1 TO 96 

3180 IF ze = 11 THEN GOSUB 3330 

3190 IF tkonto (1,0)00 THEN GOSUB 3300 

3200 NEXT 

3210 IF zflag=0 THEN GOSUB 3370:LOCATE 10, 
14:PR INT"KONTROLLAUSZUG":POKE &B1C8,2:L0CA 
TE 15,16:PR I NT"NUTZE DIE V0RZ3GE EINES DAU 
ERAUFTRAGES!" 

3220 LOCATE 37,22 

3230 IF zf1ag = l AND kflag=l THEN PR INT"Neu 
er Saldo:";US ING"#######.##”;tkonto(0,1);: 
PRINT" DM" 

3240 IF zf lag = l AND kflag = 2 THEN PRINT"Kon 
tostand US ING"#######.##";tkonto(0,1);: 
PRINT" DM" 

3250 PR I NT#3,CHR*(24);:PR I NT CHR*(24); 

3260 IF zf1ag =0 THEN GOSUB 5990 ELSE GOSUB 
6020 

3270 txt* = lNKEY$: IF txt*= B " THEN 3270 
3280 IF txt*=CHR*(224) AND zflag=l THEN 76 
40 

3290 IF txt*OCHR*< 13) THEN 3270 ELSE RETU 
RN 

3300 LOCATE#3,3,ze:PRINT#3,konta$(i>" ";:! 
F tkonto(1,1> <>0 THEN IF kflag=l THEN PRIN 
T#3,konto*(tkonto(i,1)) 

3310 L0CATE#3,42,ze:PR 1NT#3,US 1NG"#######. 
##";tkonto<i,0):ze=ze+l:zflag=l 
3320 RETURN 
3330 GOSUB 5990 

3340 IF INKEY*OCHR*( 13) THEN 3340 
3350 ze=1:CLS#3:bild=bild+l:LOCATE 59,9:PR 
INT US ING"##";bi1d 
3360 RETURN 

3370 POKE &B1C8,1:POKE &B1CF,&C0:POKE &B1D 
0, &i30 : POKE &B 1D1 , &C : POKE LB1D2,&3 
3380 RETURN 
3390 ’ 

3400 ’>> KONTOSTAENDE HOCHRECHNEN << 

3410 ’ 

3420 IF mo=13 THEN 3560 

3430 FOR i=1 TO 96 

3440 tkontoti,0)=mkonto(1152+i) 

3450 FOR n=0 TO mo-1 

3460 tkonto(i,0)=tkonto(i,0)+mkonto(n*96+i 
) 

3470 NEXTtNEXT:RETURN 
3480 ’ 

3490 •>> SALDO ERMITTELN << 

3500 ’ 

3510 n=0:FOR 1=1 TO 96:n=n+tkonto(i,0):NEX 
T 

3520 RETURN 
3530 ’ 

3540 *>> MONATSBUCHUNGEN LADEN << 

3550 ’ 

3560 FOR 1=1 TO 96 

3570 tkonto(i,0)=mkonto<(mo-l)*96+l) 

3580 NEXT:RETURN 
3590 ’ 

3600 ’>> VB AUFLOESEN << 

3610 ’ 

3620 vfIag = 0:FOR 1 = 1 TO 96 

3630 IF tkonto (1,0)00 AND tkonto (1, 1) >0 A 

ND tkonto(tkonto<1,1),1)<>i THEN tkonto(tk 

ontot1,1),0)=tkonto(tkonto(1,1),0)+tkonto( 

1,0):tkonto(l,0)=0:vflag=l 

3640 NEXT:IF vflag=l THEN 3620 

3650 RETURN 

3660 ’ 

3670 OPTION DATUM-SETZEN *»« 

3680 ’ 

3690 WINDOW#0,1,80,1,25:G0SUB 7030:PRINT"D 
ATUM W[HLEN":POKE &B1C8.2 


[27213 
C 4037 3 
(25503 
C 3343 3 
[64053 


[29463 

[5573 
[10363 
[17403 
[350 3 
[81403 


(6773 

[58763 


[70143 


[20903 

[40333 

(20043 

[20193 

(27863 

(37353 


C 2688 3 

(5553 
(8433 
[14633 
[28393 

(5553 

[32703 

[5553 

[1173 

[33953 

[1173 

[11183 

[5573 

[17163 

£ 11373 

[27493 

[14353 

[1173 

[10303 

[1173 

[27143 

[5553 
(1173 
[19023 
[1173 
(5573 
[17433 
(9403 
(1171 
£989 3 
C 1173 
£ 12573 
[108863 


[13193 

[5553 

[1173 

[14783 

[1173 

[28703 
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first DWBli 


Footballer of the Year 

CRM 64/128, Amstrad. MSX, Spectrum, 
Atari. BBC/Qectron. C16 plus 4. 
CBM 64/128 & Amstrad (disc) 

Future Knight 

CBM 64/128. Amstrad. 

I MSX. Spectrum. CI 6 j 
V plus 4. CBM64/ M 
128 & Amstrad / 
i (disc) 


tcarr. managet O 
:.4Thorpe annou 
loday. 


-uropo lo 
«Mol hä® 


r«4fcvtrd 


[Lovers 
for s 
Recor 
BANKS 


DffCJUSO< 


~’ o, " c, Sl 


1 Ir» 


CT | 


"•Kti ioai 


/ Avenger V 

Spectrum, C16 plus 4, \ 

r./ CBM 64/128. Amstrad. MSX, ' 
CBM 64/128 & Amstrad (disc) 

Trailblazer 

CBM 64/128. Amstrad. MSX. Spectrum. 

CI6 plus 4. CBM 64/128 & Amstrad (disc) 


C 16 Classics (C 16/Pius 4 ) 


MSX Classics 

(MSX-Coinputer) 

Grog’s Revenge — Gunfright 
Valkyr — Bounder 


Amtix Accolades 

(Schneider CPC) 

Monty on the Run — Sweevo’s 
World — Bounder — Starquake 


Zzap Sizzlers 

(Commodore 64/128) 

Z — Monty on the Run 
— Bounder — Starquake 


Sword of Destiniy — Jetbrix - 
Gullwing Falcon — Reach for 
the Sky — Xargon’s Revenge - 
Dork’s Dilemma 


Future Knight 


Erhebe Dich. Sir Randolph, und mache Dich aul den Weg zur 
Errettung der lieblichen Maid Ametia. die in die grausigen Klauen J 

von Speboll dem .Schrecklichen geraten ist Nach Empfang des 
intrnümensiooafen Notsignals wm mlaktischen Kreuzer SS Rusthufkel 
ist |ede Minute entscheidend Zielt' Deinen Omnibnl! Mark IV 
Angnffsanzung über und nimm die Verfolgung der Entführer aul. ehe 
Deine Gelierte für immer entschwindet. Deine waghalsige Jagd führt durch 
20 whreckniserregentfc Ebenen an! die Oberfläche des Planeten und 
schließlich in Speholts Festung, wo das Schnicksal Deiner Amelia mm 
Ausgang des tödlich«! Kampfes mit dem furchtbaren Henchndmtd abhiingt 

Eine halsbrechensrhe Raserei ins Ungewisse eine Fahrt aul der man supeischnelle 
Reaktionen braucht ganz gewiß nirlits für Angsthasen Rolle nach links und 
nach rechts, um den endlosen Ahgünden auszuweichen, die sich rund um die 
geheimnisvollen (Quadrate autiun. Flachen, die Deinen Fortgang auf vielerlei Weise 
behindern, manchmal aber auch Deine rasende Fahrt noch beschleunigen oder Dich 
zu einem Sprung zwingen. Laß die t’hr nicht aus den Augen |e schneller Du an Dem 
Ziel gelangst, desto hoher Deine Prämie. 


Das Spiel, das d«i geheimen Jugendlrauiii |edes männlichen 
Wesens «füllt, die Chance, sich einen Namen unter den 
ganz großen Fußballern zu mach«! 1 Der 17-jährige Lehrling 
beginnt seinen Aufsfeig zum Profi und erlebt eine ruhmreiche 
Karriere, mit all dem Glanz und den luttnen Enttäuschungen der 
großen Begegnungen, den TYansfer-Ahgeboten. den Verletzungen 
und allem, uns dazu gehört Stellen Sie Ihr Talent uni« Beweis in 
der Fußball-Liga, den U.E.F.A. F A und Milk Cup Cpiefen und. wer 
weiß, vidfeicht haben Sie wirklich das Zeug zum Fußballer des Jahres"’ 

Es begann mit THE WAV OF THF. nC.FJt. dem kfassisifhen Kriegskunst- 
Videoahenieuer. wo es darum ging, sich durch physische Fertitjteilen zum Nmja 
emporzukampfeu Jetzt sollst Du auch Dane hervorragenden geistigen Fähigkeiten 
unter Beweis stellen in dem nun vorliergenden zweiten Teil der Geschichte vom 
'Weg des Tigers" dem faszinierendsten Arkadcspiel überhaupt, ftemon d« 
Großmeist« der Flammen, hat Deinen AdoptivA/aler Naijishi ermord« Du hart dem 
Gott Kwon geschworen, diesen Meuchelmord zu räclieu und die geheiligten D’rgamen 
Indien zurückzuembem. Um dieses Ziel zu erreichen, wirst Du alle Deine Geschicklichkeit. 
Deinen Kamplesmul und gute Nerven hauchen, besonders wenn Du den letzten Konflikt 
teilend übersehen willst Das Glück sei mit Dir nur der dessen Herz voll Mut ist. kann siegen. 


Footballer 
of the Year 


Trailblazer 


SH 

[El 

ÜE : 1 
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Vorsicht vor Grauimporten! 

Bitte prüfen Sie schon beim Kauf, ob (die¬ 
ses Programm wirklich eine deutsche An¬ 
leitung enthält. Spätere Reklamationen 
können leider nicht berücksichtigt werden 


Gremiin Graphics Software, An der Gümpgesbrücke 24, 4044 Kaarst 2 
Vertrieb: Rushware Mitvertrieb: üllll€l@-Hlnwti Distribution in Österreich: Karasoft 

Gremlln Graphics Soltware erhalten Sie in den Fachableilungen von und sowie in allen gutsortierten Computershops und im guten Vers 








































I Programme 


3700 CLS# 7 :mo=lNT(dl/ 100 ):ta=d1-]NT<d 1 /100 [21403 
>»100 

3710 GOSUB 6040:PR 1 NT CHR*(24>; [16233 

3720 GOSUB 4040 [10093 

3730 GOSUB 4010:INK 1,24-ik:EVERY 190 GOSU [2024] 

B 4010 

3740 IF mo<l THEN mo=12 [12123 

3750 IF mo>12 THEN mo=i £9613 

3760 IF moOmol THEN GOSUB 3950 [10573 

3770 IF ta<l THEN ta=tal £15553 

3780 IF ta>tal THEN ta=l [15093 

3790 IF mo=2 AND ta=29 THEN GOSUB 3980 £20173 


3800 LOCATE 4,12;PRINT SPC(11):LOCATE 4,14 C32093 
:PR INT SPC(ll) 

3810 LOCATE 4,13:PR1NT" ";:d1=mo#100+ta:GO £30503 


SUB 3920 

3820 txt*=INKEY*:IF txt*="" THEN 3820 £19673 

3830 i=REMAIN(0) [6223 

3840 IF txt*=CHR*(241) THEN mo=mo-l £15983 

3850 IF txt*=CHR*(240) THEN mo=mo+l £21463 

3860 IF txt*=CHR*(242) THEN ta=ta-l C25203 

3870 IF txt*=CHR*(243) THEN ta=ta+l £17773 

3880 IF txt*OCHR* (13) THEN 3740 £10853 

3890 POKE &B1C8, 2 : CLSf 7: PR I NT CHR*(24); £16313 

3900 IF dl>d3 THEN d3=dl:dflag=l £7103 

3910 kf1ag = 0:s fIag=0:dl=d3:rael=2 £15313 

3915 LOCATE 4,25:PRINT"DATUM: £19263 

3920 PRINT US ING"##";d1-((dl\100)#100)j:PR £45953 
INT US ING"##";dl\100;:PR1NT".jah-190 
0 

3930 dl-mo#100+ta £9713 

3940 RETURN [ 555 ] 

3950 RESTQRE 4030:FOR 1=1 TO 12:READ mon*, £38603 
taisIF iOmo THEN NEXT 

3960 mol=mo:IF ta>tal THEN ta=tal £15243 

3970 RETURN [ 555 ] 

3980 FOR 1=1984 TO 2000 STEP 4 £14723 

3990 IF i = jah THEN RETURN £10373 

4000 NEXT:ta=28:tal=28:RETURN £25793 

4010 SOUND 129,63-ta+mo,-1,0,1,1:SOUND 130 £51233 
,42-mo, -1,0,1,1:SOUND 132,32-mo,-1,0,1,1 
4020 RETURN £5553 


4030 DATA Januar,31,Februar,29,M£rz,31,Apr £61293 
i1,30,Mal,31,Juni,30,Juli,31,August,31,Sep 
tember,30,Oktober,31,November,30,Dezember , 

31 

4040 POKE & 1 BIC 8 ,0:POKE &B1CF,&F0:POKE &B1D £22863 
0,&F:RETURN 


4050 ’ £1173 

4060 *#** OPTION KONTOFUEHRUNG «»* CI 1823 

4070 * £1173 

4080 IF d1 = 101 THEN txt 8 *="ERNFFNUNGSBETR£ £37363 
GE" ELSE txt8*="KONTOF3HRUNG" 

4090 GOSUB 7030:PR I NT txt8*:P0KE &B 1 C 8.2 £14613 

4100 kf1ag=0:GOSUB 6080 £10633 

4110 IF d1=d2 THEN 4190 £10433 

4120 FOR 1=1 TO 96 £5573 

4130 IF dl<d3 AND dflag=l THEN tkonto(i,3) £21623 
=tkonto(i, 2 ) 

4140 tkonto(1, 2)=0 £9533 

4150 IF dl=d3 AND dflag =0 THEN tkonto(i,2> £21413 
=tkonto(1,3):tkonto(1,3)=0 


4160 NEXT £3503 

4170 IF dl<d3 THEN dflag=0 £15653 

4180 IF d1=d3 THEN dflag=l £7643 

4190 d2 = d1:sf1ag=0 £9243 


4200 LOCATE 2,4:PRINT CHR*(150)STRING*(4,1 £83773 
54)CHR*(158)STRING*(17,154)CHR*(158)STR ING 
*(3,154)CHR*(158)STR ING*(10,154)CHR*(140) 

4210 LOCATE 2,5:PRINT CHR*(149)" Nr."CHR*( £88003 
149):LOCATE 25,5;PRINT CHR*(149>"Vb"CHR*(2 
41)CHR*(149)" Betrag "CHR*(143)"monatI.B 
etrag Tagesbetrag" 

4220 LOCATE 2,6:PRINT CHR*(151)STRING*(4,1 £89133 
54)CHR*(159)STR ING*(17,154)CHR*(159)STR ING 
*(3,154)CHR*(159> STR ING*(10,154)CHR*(143)S 
TR ING*(13,154)STRING*(15,143) 

4230 FOR n=7 TO 22 £5573 

4240 LOCATE 2,n:PRINT CHR*(149):LOCATE 7,n £119873 
SPRINT CHR*(149):LOCATE 25,n:PRINT CHR*(14 
9):LOCATE 29,n:PRINT CHR*(149)tLOCATE 40,n 
SPRINT CHR*(143):LOCATE 54,n:PRINT CHR*(14 
3).-LOCATE 68,nSPRINT CHR*(143) 

4250 NEXT £3503 

4260 LOCATE 2,23:PRINT CHR*(147)STR ING*(4, £110063 
154)CHR*(155)STR ING*(17,154)CHR*(155)STR IN 
G*(3,154)CHR*(155)STR ING*(10,154)CHR*(131) 


STRING*(13,154)STRING*(15,143) 

4270 WIND0W#3,26,28,7,22 £10983 

4280 pyl=l:py2=l:te =0 £17083 

4290 GOTO 4390 £5393 

4300 txt*=INKEY*:IF txt*="" THEN 4300 £20303 

4310 IF txt*=CHR*(242) THEN RETURN £23563 

4320 LOCATE 3,py1+ 6 :PR I NT" ” £13673 

4330 IF txt* =CHR*(224) THEN 7640 £14473 

4340 IF txt*=CHR*(243) THEN 4470 £13673 

4350 IF txt*=CHR*(240) THEN pyi=pyi-i £21423 

4360 IF txt*=CHR*(241) THEN pyl=pyl+i £16883 

4370 IF pyi<l THEN pyi=l:py2=py2-l £24803 

4380 IF pyl>py4 THEN pyl=1:py2=py2+1 £16513 

4390 LOCATE 3,pyl+ 6 :PRINT CHR*(246) £15963 

4400 IF py2<1 THEN py2=6 £3343 

4410 IF py2>6 THEN py2=l £11493 

4420 IF te<>py2 THEN GOSUB 5590:te=py2 £13173 

4430 GOTO 4300 £5573 

4440 ' £1173 

4450 ’>> VERBUCHEN << £7843 

4460 * £1173 


4470 nr=py2*16-16+pyl:py3=(mo-1)*96+nr:f1a £27403 
g= 0 :px 2=0 

4480 txt2*=konto*(nr):txt3*=SPACE*(15)stxt £23963 
4* = "» 

4490 IF txt2*OSPACE*( 15) AND txt 2 *<>(">?" £50503 
+SPACE*(13)) THEN wn=4 ELSE wn=2 

4500 n=INSTR(UPPER»(txt2*),"D#? H ):IF n<>0 £21063 

THEN wn=2spx2=n+2 

4510 IF wn<2 THEN wn=2:txt2*=konto*(nr) £9123 

4520 IF wrt = 2 THEN GOSUB 6050: ze = 15: tx t * = t x £40853 
t2*:GOSUB 4570:txt2*=txt* 

4530 IF wn=3 THEN GOSUB 6060:ze=3:txt*=txt £30863 
3*:GOSUB 4570:txt3*=txt* 

4540 IF wn=4 THEN GOSUB 6070:ze=9:txt*=txt £34823 
4*:GOSUB 4570:txt4*=txt* 

4550 IF wn>4 THEN wn=4:GQSUB 4010 £25583 
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Programme | 


4560 IF f1ag=l THEN 4810 ELSE 4510 
4570 IF px2<>0 THEN px1=px2:px2=0 ELSE pxl 
= 1 

4580 txt#=txt$+ SPACE$(15-LEN(tx t#) ) 

4590 LOCATE#wn, 1, pyi:PRlNT#wn,LEFT#(txt$, z 
e) ; 

4600 IF pxl=0 THEN wn=wn-1:RETURN 
4610 IF px1 = 2 e+ 1 THEN wn=wn+l:RETURN 
4620 LOCATE#wn,pxl,pyl:PR 1NT#wn,CHR#(24)MI 
D$(txt$.pxl, 1)CHR$(24) ; 

4630 tx t5$ = INKEY#: I F txtS#="" THEN 4630 
4640 LOCATEttwn,pxi,pyl:PRINT#wn,MID$(txt#, 
pxl, 1) ; 

4650 IF txt5#=CHR*(13) THEN f I ag=1:RETURN 
4660 IF wn=4 AND txt5$=CHR#(243) THEN txt5 
*="»" 

4670 IF txt5#=CHR$(243) THEN px1=px1+1:GOT 
0 4600 

4680 IF txt5#=CHR#(242) THEN px1=px1-1:GOT 
0 4600 

4690 IF wn=4 AND txt5#=CHR#(240) THEN txt5 
# = "%" 

4700 IF wn=4 AND txt5$=CHR$(241) THEN txt5 
# = n -" 

4710 IF wn=4 AND txt5$=CHR$(224) THEN txt5 
# = "/" 

4720 IF txt5$=CHR$(240) THEN pxl=l:GOTO 46 
00 

4730 IF txt5#=CHR#(241) THEN pxl=ze:GOTO 4 
600 

4740 IF txt5#=CHR* (127) AND wrt = 4 THEN MID# 

(txt#,1,3)="DEL”:GDTO 4770 

4750 IF txt5#<CHR*(32) OR txt5#>CHR*(126) 

THEN pxl=pxl-l:GOTO 4590 

4760 MlD#(txt#,pxl,l)=txt5$:pxl=pxl+l 

4770 GOTO 4590 

4780 ’ 

4790 ’>> BUCHUNG PRUEFEN, << 

4800 ’ 

4810 IF txt3*=SPACE$(15) THEN txt3$=STR$(t 
konto(nr,1)) 

4820 zf1ag=0 

4830 IF txt2*=SPACE$(15) THEN txt2*=”>?"+S 
PACE#(13) 

4840 IF di=101 AND INSTR(UPPER#(txt2#),"D# 
n )<>0 THEN GOSUB 5350:GOTO 4860 
4850 IF INSTR(UPPER$(konto#(nr)),"D#")<>0 
THEN GOSUB 5350 


4860 txt3# = ”0 n + LOWER#(txt3#) 

4870 z3=VAL(txt3*):z3=INT((z3/100-z3\100)* 

100+0.4) 

4880 n=INSTR(txt4#,” + "): IF 

n<>0 

THEN 

Ml 

D# ( 

txt4$,n)=" " 

4890 n=INSTR(txt4#,”/">:IF 

n< >0 

THEN 

MI 

D# ( 

tx t4$,n> = ” " : zf1ag=10 

4900 n=INSTR(txt4#,"*"):IF 

n<>0 

THEN 

MI 

D# ( 

txt4#,n)=" ":zf)ag=20 

4910 n=INSTR(txt4#,”%”):IF 

n< >0 

THEN 

MI 

D# ( 

txt4*,n)=" ":zflag=30 

4920 n=INSTR(txt4#,"-"):IF 
txt4*,n)=" ":zf1ag=zf1ag+1 

n<>0 

THEN 

MI 

D# ( 


C1375] 

[19103 

C1993] 

[1808] 

C 2042] 

C 2179] 
[2702] 

[2167] 

[24483 

[2363] 

[18603 

[28413 

[2099] 

[2843] 

[2800] 

[1843] 

[2013] 

[2728] 

[21263 

[37563 

[16073 

[4993 

[1173 

[19683 

[1173 

[20923 

[6463 

[21793 

[26213 

[1997] 

[13323 
[18933 

[26943 

[33933 

[28663 

[40773 

[4878] 


4930 txt4# = "0' 1 +txt4$:n = VAL(txt4$) 

4940 IF zf 1 ag>1 THEN GOSUB 5150 
4950 IF zf1ag=1 THEN n=n*-l 
4960 tkonto(nr,3)=0 

4970 bu=0:FOR zi=l TO 13:IF mkontol(zl-1)* 
96 + nr)<>0 THEN bu = bu+l 
4980 NEXT 

4990 IF bu<=1 THEN tkonto(nr,1)=z3 

5000 IF INSTR(txt4$,"DEL"><>0 THEN GOSUB 5 

450 

5010 IF n<>0 AND txt2#<>">?"+SPACE#(13> TH 
EN GOSUB 5540 

5020 IF lNSTR(UPPER#(txt2#),"D#")<>0 THEN 
GOSUB 5260 

5030 IF bu=0 OR txt2#<>">?" + SPACE*(13) THE 
N konto#(nr)=txt2* 

5040 IF (z3<>tkonto(nr,1) AND bu>0 OR kont 
o$(nr)=">?"+SPACE#(13>>THEN GOSUB 4010 
5050 IF konto#(nr)=">?"+SPACE#(13) THEN tk 
onto(nr,1)=0 

5060 IF py3=96 THEN 5080 

5070 IF konto#(nr)= H >?"+SPACE#(13) AND kon 
to$(nr+l)*SPACE#(15> AND bu = 0 THEN konto#( 

nr)=SPACE#(15):tkonto(nr,1>=0:IF py4>l THE 

N py4=py4-1 

5080 i=pyl:GOSUB 5710 

5090 IF py3=96 THEN 5110 

5100 IF py 1 < 16 AND konto# <nr ) OSPACE# (15) 
AND konto#(nr+i)=SPACE#<15) THEN pyl=pyl+l 
:py3=py3+l:py4=pyl:i=pyl:nr=nr+l:GOSUB 569 
0 

5110 GOSUB 5980:GOTO 4390 
5120 ’ 

5130 ’>> FUNK ION BERECHNEN << 

5140 ’ 

5150 IF n=0 THEN 5210 

5160 IF tkonto(nr,2)=0 THEN z1=mkonto( P y3> 
:GOTO 5180 


5170 

zi = 

tkonto(nr 

,2) 

:IF zfIag<30 THEN 

tkon 

to (nr 

,2) 

= 0 :mkonto 

(py3)=mkonto(py3) 

-zl 


5180 

IF 

zf1ag=10 

OR 

zf1ag=11 

THEN 

n = zl 

/n 

5190 

IF 

zf1ag=20 

OR 

zf1ag=21 

THEN 

n = n* 

zl 

5200 

IF 

zf 1 ag = 30 

OR 

zflag=31 

THEN 

n = z 1 

*n/ 1 


00 

5210 zflag=zflag-(zfIag\10)*10 
5220 RETURN 
5230 ’ 

5240 ’>> DAUERAUFTRAG BEARBEITEN << 

5260 IF dl=101 THEN RETURN 
5270 zl=INSTR(UPPER#(txt2$),"D#") 

5280 z2=INT(VAL("0"+MID#(txt2#,zl+2,1>>) 
5290 IF z2>6 THEN z2=0 

5300 IF z2=0 THEN M1D#(txt2*,z1,3)="D#?":G 
OSUB 4010:RETURN 

5310 IF tkonto(nr,2)=0 THEN tkonto(nr,2)=m 
konto(py3> 

5320 IF tkonto(nr,2 > =0 THEN z2 = 0:GOTO 5300 
5330 FOR z1=mo TO 12 STEP z2:mkonto((z1-1) 
*96+nr)=tkonto(nr,2) 

5340 NEXT:RETURN 


[1624] 
[2537] 
[2076] 
t1414] 
[26291 

[350] 

[1291] 

[2676] 

[3377] 

[2461] 

[4311] 

12846] 

[2864] 

[996] 

[7788] 


l1518] 
[1030] 
[5542] 


[2017] 

[117] 

[1640] 
[117] 
[831 ] 
[3089] 

[50181 

[2774] 
[3401] 
[2372] 

[1914] 
[ 5551 
[ 117] 

[1444] 
[117] 

[1986] 
[1740] 
[2439] 
[1232] 
[3906] 

[28991 

[1767] 
(31721 

[940] 
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GAMESOFT 

6450 Hanau - Hospitalstraße 6 - Telefon: (061 81)2523 81 

AUSZUG AUS UNSERER PREISLISTE 


- 


Schneider CPC 

c 

D 

Schneider CPC 

c 

D 

fl 

- i 1 


Mission Elevator 

ARC 

39,- 

49,- 

Leader Board 

SIM 

44,- 

54,- 


Equinox 

ARC 

39,- 

49,- 

Shogun 

ARC 

39,- 

49,- 



Room 10 

ARC 

34.- 

44,- 

Pro Tennis 

ARC 

39.- 

59,- 

i 


SAI Combat 

ARC 

34,- 

44,- 

Sword's + SorceryADV 

44, - 

54,- 



International Karate ARC 

34.- 

44,- 

PYRADEV 

U TI 

— 

87, 



Nexor 

ARC 

37,- 

47,- 

Laser BASIC 

UTI 

54,- 

64,- 


! 

Tomahawk 

SIM 

37,- 

47.- 

Laser Compiler 

UTI 

64,- 

79,- 

^ 1 

1 

Nexus 

ARC 

39,- 

49,- 

Soccer '86 

ARC 

47,- 

64,- 

■ : 


Spindizzy 

ARC 

44,- 

54,- 

Hexenküche II 

ARC 

34,- 

44, 

i 


Super Bowl 

SIM 

39,- 

— 

Saboteur 

ARC 

39,- 

54,- 


Jetzt NEU: Ladengeschäft in Hanau! 


12 '86 CRC 119 























I Programme 


5350 IF d 1 = 101 THEN 5390 {11961 
5360 tkontofnr, 2) =mkonto( py3) C2016] 
5370 FOR zl=mo TO 12 :rakonto((z1-1) »96+nr >= £2423) 
0:NEXT 

5380 mkonto(py3)=tkonto(nr,2>:tkonto(nr,2) [3779] 
=0:RETURN 


5390 txt2*=konto*(nr): txt4* = SPACE*(15):l=p [2809] 

yi 

5400 FOR zl = l TO 2:PR INT#2,CHR*(24);:GOSUB [4396] 
5710:GOSUB 4010:FOR z2=l TO 200:NEXT z2,z 


1 

5410 RETURN [5551 

5420 ’ [117] 

5430 ' >> BUCHUNG LOESCHEN << [1940] 

5440 ’ [117] 

5450 ]F tkonto(nr,2)=0 AND mkonto(py3)<>0 [51751 

THEN GOSUB 5480:mkonto(py3)=0 

5460 mkonto(py3)=mkonto(py3)-tkonto(nr,2): [3991] 
tkonto(nr,2)=0 

5470 RETURN [5551 

5480 i=py1 [8851 

5490 FOR zl = l TO 2:PR 1NT#5,CHR*<24);:GOSUB C5823] 
5780:GOSUB 4010:FOR z2=l TO 200:NEXT z2,z 

1 

5500 RETURN [555] 

5510 • [1171 

5520 '>> BUCHUNG EINTAGEN << C2222] 

5530 ' [117] 

5540 mkonto(py3)=mkonto(py3)+n:tkonto(nr,2 [4670] 
)=tkonto(nr,2 > +n 

5550 RETURN [555] 

5560 ’ [1171 

5570 ’>> KONTEN LISTEN << [1467] 

5580 ’ [117] 

5590 WIND0U#2,8,24,7,22:CLS#1:CLS#2:CLS#3: [4068] 
CLS #4:CLS#S:CLS#6:W1ND0W#2,9,24,7,22 
5600 IF sym<>6 THEN CLS#7 [953] 

5610 LOCATE 9,5:PR]NT SPACE*<15) [16861 


5620 RESTORE 5630:FOR i=l TO py2:READ txt* [31291 
:NEXT:LOCATE 9,5:PR(NT txt* 

5630 DATA Kapitalkonten,Finanzen/Kredit,So [79381 
nderkosten,Waren Gruppe I,Waren Gruppe tl 
,A t lg. Kosten 

5640 i=0:FOR py3=(mo-1)*96+(py2*16)-15 TO [2414] 
(mo-l)*96+(py2*16> 


5650 i=i+l:nr=(py2-l)«16+i:GOSUB 5690 [22431 

5660 (F konto*(nr)=SPACE*(15) THEN py4=i:G [2860] 
0T0 5680 

5670 NEXT:py4=16 [884] 

5680 FOR i=1 TO 10:txt*=INKEY*:NEXT:GOTO 5 (33971 
980 

5690 L0CATE#1,1,1 [8351 

5700 PRINT#1,US1NG"###";(py2-1)* 100 + nr; [16171 

5710 L0CATE#2,1,i £7561 


5720 IF mkonto(py3)<>0 THEN LOCATE 8,1+6:P [55431 
RINT CHR*(24)" "CHR*(24):PR INT#2,CHR*(24)k 


onto*(nr); " ”;CHR4(24); 

5730 IF mkonto(py3)=0 THEN LOCATE 8,i+6:PR [4100] 
INT” ":PRlNT#2,konto*(nr) 

5740 WIND0W#2,9,24,7,22 [11641 

5750 L0CATE#3,1,i [739] 

5760 PRINT#3,USING"###";((tkonto(nr,1)-1)\ [2366] 
16)* 100+ tkonto(nr,1>; 

5770 L0CATE#4,1, 1:PR I NT#4,SPACE»(9); [15951 

5780 L0CATE#5,1,1 (3871 

5790 IF mkonto(py3)<>0 THEN PR INT#5,US 1NG" (57181 
######.##";mkonto(py3) ELSE PRINT#5,SPC(10 
); 

5800 L0CATE#6,1, I (5621 

5810 IF tkonto(nr,2)<>0 THEN PR INT#6,US ING (43581 
"######.## ";tkontofnr, 2) ELSE PRINT#6,SPC( 

10 ) ; 

5820 RETURN [555] 

5830 ’ (117] 

5040 ’**# LAYOUT **# [16761 

5850 ’ £117] 

5860 CLS £91] 


5870 PRINT CHR*(150)STR ING*(59,154>CHR*(15 [35321 

6) " HABIL VI. 1" 

5880 PRINT CHR*(149):LOCATE 6l,2:PRINT CHR [61771 
*(149)" Hausha1tsb11anzen"; 

5890 PRINT CHR*(151)STR ING*(59,154)CHR*(15 £2706] 

7) " *1986" 

5900 FOR n=4 TO 23:PRJNT CHR*(149):LOCATE £52181 
72,n!PR I NT CHR*(149):LOCATE 80,n:PRINT CHR 
*(149); 


*** SYMBOL AUSWAHL *** 


CLS#7:sym=l:GOSUB 6090:sym=7:GOTO 609 


CLS#7:sym=2:GOTO 6090 
CLS#7:sym = 3:G0TQ 6090 
CLS#7: sym = 4 .-GOSUB 6090: sym = 2:G0T0 


609 


£366] 

[37031 


(5551 

[117] 

£16541 

£1171 

£2340] 

£ 13871 
£21181 
(2313] 


CLS#7:sym=2:G0SUB 6090:sym=7:GOTO 609 £2370] 


5910 NEXT n 

5920 PRINT CHR*(147)STRING*(70,1S4)CHR*(15 
5)STR ING*(7,154)CHR*(153); 

5930 LOCATE 61,4:PRINT CHR*(147)STRING*(10 £3765] 
,154)CHR*(158)STR ING*(7,154)CHR*( 156) ; 

5940 RETURN 
5950 ’ 

5960 
5970 
5980 
0 

5990 
6000 
6010 
0 

6020 
0 

6030 PR I NT#7,CHR*(24):CLS#7:sym=7:GOSUB 60 £3450] 
90:PR I NT#7,CHR*(24):RETURN 

6040 CLS#7:sym=i:GOSUB 6090:sym=2:GOTO 609 £2594] 
0 

6050 CLS#?:PRINT#7:PR1NT#7,CHR*(24)" "+CH £76671 

R*(24)+"D#?"+CHR*(24> +" jeden ?.Monat 0 

-6 "CHR*(24);:sym=5:GQSUB 6090:sym=2:GOTO 
6090 

6060 CLS#7:PR]NT#7:PR I NT#7,CHR*(24)" Vb" + [75031 
CHR*(241)+" "CHR*(24)"Ifn"+CHR*(24 

)+"? Vbauf Nr."CHR*(24);:sym=3:G0T0 6090 
6070 CLS#7:sym=8:GOSUB 6090:sym=3:GOSUB 60 £42481 
90:sym=4:GOTO 6090 

6080 PRINT#7,CHR*(24):CLS#7:sym=6:GOSUB 60 £4870] 
90:PRINT#7,CHR*(24):RETURN 

6090 PR INT#7:ON sym GOSUB 6110,6170,6220,6 £3174] 
290,6330,6380,6450,6500 

6100 RETURN [5551 

6110 PR INT#7,CHR*(24)CHR*(150)STR ING*(5,15 £32811 
4)CHR*(156)t 
6120 PRINT#7,CHR*(149) 

*<149)i 

6130 PR I NT #7,CHR*(149)CHR*(242)" 

43)CHR*(149); 

6140 PR INT#7,CHR*(149)" 

*(149) ; 

6150 PRINT#7, CHR*(147)STRING*(5,154)CHR*(1 
53)CHR*(24); 

6160 RETURN 

6170 PRINT#7,CHR*(24)CHR*(150)STR ING*<5,15 
4)CHR*(156); 

6180 PR INT#7,CHR*(149)"ENTER"CHR*(149) ; 

PR INT#7,CHR*(147)CHR*(156)" "CHR*( 


"CHR*(240)" "CHR £22591 


"CHR*(2 £26211 


’CHR*(241) 


"CHR £23731 


(30681 


*CHR*(147)STR ING*(4,154)CHR £22701 

£555] 
£32811 


6240 

6250 

6260 

6270 


9"CHR*(149) 
6"CHR*(149) 
3"CHR*(149) 
E"CHR*(149) 


6190 
149) ; 

6200 PR INT#7," 

*(153)CHR*(24) ; 

6210 RETURN 

6220 PR I NT#7,CHR*(24)CHR*(150)STR ING*(5,15 
4)CHR*(156); 

6230 PR INT#7,CHR*(149)"7 
PRINT#7,CHR*(149)"4 
PR INT#7,CHR*(149)"1 
PR INT#7,CHR*(149)"0 

PRINT#7,CHR*(147)STR ING*(5, 154)CHR*(1 
53)CHRS(24); 

6280 RETURN 

6290 PRINT#7,CHR*(24)CHR*(150)STR ING*(5,15 
4)CHR*(156); 

6300 PRINT#7,CHR*(149)" DEL "CHR*(149); 
6310 PR INT#7,CHR*(147)STR ING*(5, 154)CHR*(1 
53)CHR*(24); 

6320 RETURN 

6330 PR I NT#7,CHR*(24)CHR*(150)STR ING*(5,15 
4)CHR$(156) ; 

6340 PR INT#7,CHR*(149)"ASCI 1"CHR*(149); 
6350 PR INT#7,CHR*(149)"TASTE"CHR*(149); 
6360 PR I NT #7,CHR*(147)STR 1NG*(5, 154)CHR*(1 
53)CHR*(24); 

6370 RETURN 

6380 PR I NT#7,CHR*(24)CHR*(150)STR ING*(5,15 
4)CHR*(156) ; 

6390 PRINT#7,CHR*(149) 

PRINT#7,CHR*(149) 

PR INT#7,CHR*(149) 

PR INT#7,CHR*(149) 

PR I NT#7,CHR*(147)STR ING*(5,154)CHR*(1 
53>CHR*(24); 

6440 RETURN’ 

6450 PR INT#7,CHR*(24)CHR*(150)STRING*(5,15 


£555] 

£3281] 


£ 1599] 
£25281 


6400 

6410 

6420 

6430 


’ "CHR*(149) 
’WARTE"CHR*(149) 
’BITTE"CHR*(149) 
1 "CHR*(149) 


£ 2011 ] 
£2068] 
£1594] 
£2303] 
£3068] 

£555] 
£3281] 

[1829] 
£3068] 

£555] 

£3281] 

£2146] 
£ 1896] 
£30683 

£ 55S ] 
£3281] 

£ 1943] 

£ 1666] 
£1763] 
£1943] 
£3068] 

£555] 
£3281] 
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ProSoft-Preise liegen richtig! 

S 02 61/40 47-1 • Telex 862476 PSOFT 


Günstige Möglichkeit der Fianzierung durch Ratenkredit. Fordern Sie die Unterjagen an. 

Wir suchen ständig günstige Einkaufsquellen für die angebotenen und neue innovative Produkte. 


Amstrad - Amstrad - Amstrad 
Schneider - Schneider 

Schneider464mitgrünemMonitor DM 748,- 
Schneider464 mit color Monitor DM 1199,- 



Schneider 6128 mit grünem 

Mon or DM 898,- 

Schneider 6128 mit color Monitor 

DM1498,- 
DDI-1 448,- FD-1 448,- 
MP 1 119,- MP-2 139,- 



DMP-2000 _ 

Druckerxabei. für Elle Drucker mit Centronics- 

Schnittstelle an den Schneider 6128 

2000 Blatt Endlospapier_ DM 39,- 


Joyce PCW - 8256 

DM1548,- 

FD-2 1 MB Laufwerk 

DM 598,- 

Joyce + PCW -8512 

DM2098,- 

DM 599^- 

nur DM 39,- 


3” Disketten 10 Stück für Schneider 

Panasonic DM 79- Maxell DM 89,- 


Disksttei -Software tir alie Schnp'de’-P'odukts preis,-eh aut Anfrage Bitte 'ordern Sie die Liste an. 


Amstrad PC 1512 

ceutscheTastatui. englisches Handbuch 512 KB RAM 20 MB Harddisk, 1 Floppy 

mit Grün-Monitor 3348,- mit Color-Monitor 3798,- 

D * neuen Schneider-PC kennen Sie bei uns vorbeste 1 len Die Lieterunaertönt unoener.:! 


OKI 

OKI 

OKI 

OKI 

OKI 

OKI 

Okimate 20 Farbdrucker mit 

nterface 


548,- 

ML-182 

598 - 

ML-183 

848,- 

ML-192 

999 ,- 

ML-193 

ML-294 

1198,- 

1998,- 

ML-292 

1198- 

ML-293 

1599,- 


Centronics GLP-4 

nci. serielle und parallele Schnittstelle 

EPSON FX-85 
DM 1099,- 


DM 398,- 


incl Centromcs-Interface 


LX-86 

799- 

FX-105 

1399- \. 

LQ-1000 

1949,- 

LO 800 

1499- 

JX-80 

1799- 

HI-80 

1239,- 

IX-800 

1598.- 

LO 2500 

2598,- Epson 

EX-800 

1498- 

EX-1000 

1698- FX-85» 



Citizen LSP-120D 
DM 398,- 

incl. Centromcs-Interface oder Commodore 

MSP-15 e 1398.- MSP-20 1358,- 
MSP-25 1738,- MSP-IOe 994- 
LSP-10 798,- HCP-45 2098- 

Citizien LSP-120 D > 

NEC - NEC - NEC - NEC - NEC 



1 P5 

2222,- 

P 6 

1348,- 

| P 7 

1748,- 

Alle Drucker incl. 

parallel Interface. 


Brother - Brother - Brother 


4-1109 
4-2024 L 


548. 

2098, 


M-1409 
HR-15 XL 


899- 

1089- 


M-1509 
HR-35 DD 


1188,- 

2498,- 


Tandon Tandon Tandon 


Amstrad 

6128 grün 799,- 6128 color 

Citizen 120Dincl- Kabel für6128undTractor 


1298,- 

439,- 


Atari - Atari - Atari - Atari 

Atari 1040 ST.Taslz-Uir, 1024 KR RAM. 192 KB ROM. integrierte 

Floppy 72C KB, Monochrom Monitor SM 124 Maus. Basic. Logo 2198,— 

Atari 1040 ST,Tastatur. 1024 K3 RAM. 192 KB ROM. integrierte 

Floppy 720 KB, Color Monitor SC 1224 Atari. Maus, Basic, Logo 2698,- 

Atari 1040ST, Tastatur, 1024 KB RAM. 192 KB ROM integr Floppy 

720 KB. RGB-Monitor 10095Thomson Maus. Basic. Logo 2598,- 


Vortex - Vortex - Vortex 


Floppy Fl-S bzw Ml S 
Floppy Fl-Dbzw M1-D 
M1-X13 5") 

F1-X15 25”) 

Ml -XRS (3.5”) 

Fl XRS (5 25 ) 

WD-20 

WD- 20 ohne Floppy 



DM 878,- 
DM 1298,- 
DM 698,- 
DM 698,- 
DM 758,- 
DM 758,- 
DM2899,- 
DM 2648,- 


StarNL-IO 699,- 


incl Interface für Commodore, 
Centronics oder IBM 

Einzelblatteinzug für Star NL-4O 

zusätzliches Interface für NL- 10 
SD 10 1074,- SR 10 

SD 15 1438 - SR 15 

SG 15 1098.- NG-10 

NX-15 1198.- 


StarNL-10 



Bogenstr. 53, Postf. 207, D-5400 Koblenz-Goldgrube 
Telefon 0261/4047-1 - Telex 862476 PSOFT 

Alle Preise zuzugI 10- 0M Versandkosten pro Paket Lieferung per Nachnahme oder Vorrasse- 
scheck - Versandkosten Ausland DM 40 - pro Pakei Lassen Sie sich keinen Bären aufbinden! 
ProSoft liefert Original-Produkte der führenden Hersteller. Überzeugen Sie sich selbst durch 
Abholung der Ware in unseren Verkaufs- und Vorführräumen in Koblenz. Wir gewähren Ihnen 
bei Barzahlung (kein Scheck) 2 % Skonto auf alle Preise, was vielleicht schon zur Deckung 
Ihrer Reisekosten ausreicht, CPC - 12 86 


PC 

2998,- 

XPC 10 

3748,- 

XPC 20 

3998,- 

PCA 

4998,- 

PCA 20 

5598,- 

PCA 30 

6398- 

PCA 40 

6998,- 

Aufpr t Farbs 898,- 

AT-Speicherkarte2 MB 

1496,- 


Olivetti Olivetti Olivetti 

Olivetti M19 2498,- 

Olivetti M24, 640 KB 2 Laufwerke, 360 KB Monitor Tastatur 

MS-DOS. GW-Basic 4999,- 

Olivetti M 24, 640 KB - 1 Diskettenlaufwerk 360 KB, 1 Festplatte 
20 MB. serielle und parallele Schmtlstelle. Bus Converter, 

Monitor. Tastatur, MS-DOS/GW-Basic 5998,- 

Olivetti M28, AT-kompatibel. Einstiegskonfiguration 7698,- 


Commodore-PC Commodore-PC 


Commodore PC-10 11-20 

mit 20 MB Festplatte integriert. 640 KB Hauptspeicher. 

2 Diskettenlaufwerke, 1 Festplatte 20 MB (Seagate), 

AGA-Karte. Monitor, Tastatur, MS-DOS-GW Basic 

3998,- 

PC-10 II 2978.- 

Amiga + Monitor + Anwenderpaket 

Sidecar (MS-DOS für Amiga) 

2748,- 

1648,- 

Commodore Commodore 

MPS 801 Ccmmcdore Drucker 378,- MP3S02 Ccmmcdcre 498,- 

MPS 1000 incl. parallel und Commodore Schnittstelle 

748,- 

Floppy 1571 688,- Monitor 1901 

Commodore C 128 679,- Commodore 128 D 

699,- 

1288,- 

C 64 II incl. Geos 

468,- 


Plantron 

PT-16LC2 30 3298,- 

PT-16 XT Turbo 1978,- 

PT-16AT 4398,- 


S 1 /-» 1 ' 1 D 


5'/*" Data life HD, 1,6 MB 


PT-16 LC 1678,- 

PT-16ST 3598- 

PT-16XTTurbo2 20 3198 - 

PT-16AT2C 5298,- 


100 Stück 


10 Stück 


PT-16LC2 20 2998.- 

PT-16ST20 4798,- 

OT -16 XTTurba 2 30 3596.- 


50 Stück 100 Stück 
149.- DM 279 -DM 

169 - DM 319, DM 

69 - DM 99 - DM 

79,- DM ~| 

98,- DM 


Disketten No-Name 


3V2” 1 D 
3 V 2 ” 2 D 
5 V 4 " 2 D 


10 Stück 

35 - DM 
39.- DM 

19 - DM 














































r~ Programme 


4>CHR*(156); 

6460 PR I NT #7,CHR* <149)"COPY "CHR*(149); 
6470 PR I NT#7,CHR*(149)" EIN "CHR*(149); 
6480 PR I NT§7,CHR*(147)STR ING* < 5,154)CHR*(1 
53)CHR*(24); 

6490 RETURN 


6500 PR I NT#7,CHR*(24)CHR*(150)STR ING* < 5,15 
4)CHR*(156); 

6510 PR INT#7,CHR*(149)" * "CHR*(149); 

6520 PR!NT#7,CHR*(149)CHR*(242)” / »"CHR$( 
149) ; 

6530 PR INT#7,CHR*(149)" - "CHR*(149); 

6540 PRINT#7,CHR*(147)STR ING*(5,154)CHR*<1 
53)CHR$(24); 

6550 RETURN 
6560 ’ 

6570 ’ *»* VORBEREITUNG »** 

6580 * 

6590 SYMBOL AFTER 32 

6600 SYMBOL 91,198,16,56,108,198,254,198,0 
6610 SYMBOL 92,102,56,108,198,198,108,56,0 
6620 SYMBOL 93,102,0,102,102,102,102,60,0 
6630 SYMBOL 123,108,0,120,12,124,204,118,0 
6640 SYMBOL 124,102,0,60,102,102,102,60,0 
6650 SYMBOL 125,102,0,102,102,102,102,59,0 
6660 SYMBOL 126,120,198,198,252,198,198,24 
8, 192 

6670 MODE 0:INK 0,0:INK 1,15,26 

6680 BORDER 0:PAPER 0:PEN 1 

6690 LOCATE 1,11:PR INT"DRUCKER EINSCHALTEN 


6700 PR INT#8:INK 1,0 

6710 MODE 2:GOSUB 5860 

6720 ENV 1,1,15,1,15,-1,5 

6730 ENT -1,1,0,9,1,-0,9 

6740 wl=60:REM >>> MIN.60 - MAX.80 <<< 

6750 WIDTH wi:SPEED WRITE 1 
6760 WINDOWII1,4,6,7, 22 : W I ND0W#2,9,24, 7,22 
6770 UIND0W#4,31,39,7,22:WIND0W#5,43,53,7, 
22 

6780 WINDQW#6,57,67,7,22:WINDQW#7,73,79,5, 
23 

6790 WIND0W#3,2,71,5,23:Wt NDGW#0,1,80,1,25 
6800 DIM konto*(96>,tkonto<96,3),mkonto(12 
53),bi(3,3) 

6810 jah = 1986 
6820 GOTO 7070 

6830 GOSUB 5860:GOSUB 2810:GOSUB 7530 
6840 GOSUB 4040:LOCATE 3,2:PRINT"- HAB IL"M 
ID*(STR*(jah-1900),2,2)" 

6850 GOSUB 3370:LOCATE 12,12:PRINT CHR*(24 
)txt0*CHR* < 24 >:LOCATE 11,14 
6860 PR I NT" WI RD GELADEN !":POKE &<B1C8,2:G0 
SUB 6080:INK 1,15 

6870 WINDOW#0,2,35,5,23:OPEN IN txt0* 

6880 INPUT#9,dflag,dl,d2,d3,jah 
6890 FÜR 1=1 TO 96 


6900 1NPUT#9,konto$(i) 

6910 IF konto*(1)="" THEN konto*(i)=SPACE* 
(15) 

6920 FOR n=1 TO 3 
6930 INPUT#9,tkonto(I,n> 

6940 NEXT n,i 

6950 FOR i=l TO 1248 

6960 INPUTÜ9,mkonto(i ) 

6970 NEXT 1 
6980 CLOSEIN 

6990 INK 1,0:CLS#3:WINDOWH0,1,80,1,25:RETU 
RN 

7000 ’ 

7010 ’>> KOPFZEILE LOESCHEN << 

7020 ’ 

7030 UINDOW#0,1,80,1,25:L0CATE 2,2:PRINT S 
PC(59):GOSUB 3370:LOCATE 2,2:RETURN 
7040 ’ 

7050 ’ *»* EINRICHTEN u KOPIEREN ##* 

7060 ’ 

7070 CLS#3:GOSUB 6040:GOSUB 7030 
7080 PR I NT”ARBEITSKOPI EN ERSTELLEN" 

7090 WINDOW#0,2,35,5,23 
7100 BORDER 12:INK l,24-ik:INK 0,12 
7110 GOSUB 3370:PR 1 NT:PR I NT:PR I NT" Bitte 
Kalenderjahr w£hlen!" 

7120 PRINT" "jSTRING*(26,154) 

7130 LOCATE i,7:F0R i=1980 TO 1996 STEP 4: 
FOR n=0 TO 3 


[1694] 
[2041] 
[3068) 

[555) 
C3281) 

[24163 

[29023 

[15673 

[30683 

[5553 

[1173 

£8173 

£117) 

[1296) 
[18063 
£22153 
£23333 
£21313 
£20723 
£24613 
£2253) 

£16023 

£13783 

£30313 

[10173 
[15443 
[1058) 
£ 14203 
£22323 
[20613 
£29523 
£32123 

£25663 

£1825) 

[24063 

£3173 

£3653 

£18313 

£34433 

£57133 

£35283 

[13223 
£23323 
£5573 
C 838 3 
£1900) 

[8013 
[17921 
£572 3 
£6443 
£13563 
£375 3 
£7523 
[14063 

£1173 

£18013 

£1173 

£49543 

£1173 
£ 18243 
£1173 
£ 15473 
£24733 
[768 3 
(16763 
£59103 


£22563 
[1602) 


7140 PRINT" ";:IF i+n=jah THEN PRINT CHR*< 
24);1+n;CHR*(24); ELSE PRINT i+n; 

7150 PRINT" :NEXT:PR I NT:PR I NT:NEXT 
7160 txt*=INKEY*:IF txt*="" THEN 7160 
7170 IF txt*=CHR*(240) THEN jah=jah-4 
7180 IF txt* =CHR*(241) THEN Jah=jah + 4 
7190 IF txt*=CHR*(242) THEN jah=jah-l 
7200 IF tx t* = CHR*(243) THEN jah=jah+l 
7210 IF jah>1999 THEN jah=1999 
7220 IF jah<1980 THEN jah=1980 
7230 iF tx t* OCHR*(13) THEN 7130 
7240 CLS:PRINT"Bitte die Versionsnummer w( 
hIen!":PR I NT STRING*(32,154):PR INT:PR INT 
7250 PR INT"Die Arbeitskopie und die Da 
tei" 

7260 PR INT"erha 1ten nach drlcken einer Zif 
f er" 

7270 PRINT"(l-9) eine Erkennung, die bei 
den" 

7280 PR INT"Programmnamen beigeflgt werden. 

7290 POKE &B1C8,2:GOSUB 6000:GOSUB 3370 
7300 version=VAL("0"+INKEY*):IF version>9 
OR versiond THEN 7300 

7310 UINDOW#0,2,35,5,23:CLS:d1=101:d2=101: 
d3=101 

7320 GOSUB 7530:GOSUB 2810:GOSUB 3370 
7330 PR INT"ARBEITSKOP1 EN AUFZEICHNEN:":PR I 
NT STRING*(26,154):PR1NT 

7340 PRINT"Bitte Datentrlger einIegen!":PR 
INT 

7350 PR INT"Speicherplatzbedarf: 36K":PRINT 
7360 PR 1NT"Name der Arbeitskopie: "txtl*:L 
QCATE 24,9:PR I NT STR ING*(11,154> 

7370 LOCATE 1,10:PR 1NT"Name der Datei: "tx 
t0* 

7380 LOCATE 17,li:PRlNT STR 1NG*(11, 154) 
7390 POKE &B1C8,2:GOSUB 5990 
7400 IF 1NKEY*<>CHR*<13) THEN 7400 
7410 ’ 

7420 ’>> ZEILENGENERATOR << 

7430 ’ 

7440 GOSUB 6080:GOSUB 3370 
7450 PEN 0 : CALL 8.BB00 

7460 KEY 0,"6810 jah ="+STR*(jah)+ CHR*(13) 
+ "DELETE 7070-7300"-t-CHR* (13) 

7470 KEY 1,"6820 Version =”+STR*(version)+ 
CHR*(13) 

7480 KEY 2,"goto 7570"+CHR*(13) 

7490 RESTORE 7500 : i =&<B514 

7500 DATA 02,04,01,80,02,04,01,20,02,04,01 
,40,">",10,05,06,00,"Start" 

7510 READ txt* :IF txt*=”start"THEN END:ELS 
E IF txt* = ">" THEN i=kBS3C:G0T0 7510 
7520 txt*="&"+txt* : n = VAL( txt* > :POKE i,n:i = 
i +1:GOTO 7510 

7530 tx 11*="HAB"+MID* (STR*(jah-1900) ,2,2) + 
"N"+MlD*(STR*(verslon),2,1)+".BAS":RETURN 
7540 » 

7550 ’>> ARBEITSKOPIEEN SPEICHERN << 

7560 ’ 

7570 CALL kBB00:PEN 1 

7580 SAVE txtl*:dl=101:d2=dl:d3=dl:dflag=l 
7590 OPENOUT txt0*:GOSUB 2710 
7600 RUN 
7610 ' 

7620 '*** DRUCKER-COPY EIN *** 

7630 * 

7640 GOSUB 6030:GOSUB 7530:GOSUB 8010 
7650 ON mel-1 GOSUB 7680,7720,7720,7830 
7660 txtS*=STRING*(wi*2-1,PR I NT#8 
,t x t8* 

7670 FOR i=1 TO 3:PR!NT#8:NEXT:RETURN 
7680 i=0:FOR n=l TO 96 

7690 IF tkonto(n,2)<>0 THEN txt8*=konto*(n 
):wert=ROUND(tkonto(n,2),2):i=i+1:GOSUB 80 
80 

7700 NEXT:IF 1=0 THEN txt8*=" Keine Tagesb 
uchungen eingetragen!":PRINT#8,txt8* 

7710 RETURN 

7720 IF kf1ag = 1 THEN txt8* = "Alter Saldo:": 
wert=ROUND(tkonto(0.0),2):GOSUB 8090:PRINT 
#8,STRING*(wi,"-") 

7730 FOR n=1 TO 96 

7740 IF tkonto(n,0)<>0 THEN 7790 

7750 NEXT 


C31193 

[18823 
£20813 
C19513 
[18553 
£22603 
l15483 
[10893 
£ 13273 
[13023 
[7096 3 

£37773 

£31293 

£38313 

£33663 

[12773 
[34523 

£20133 

£27913 
[48833 

[42081 

£31953 

[43553 

[38863 

[16433 
[9643 
[13393 
£117) 

£ 13813 
£117) 
£17153 
[1057) 
£29833 

£34683 

C17673 
[14963 
£40863 

[40633 

[26943 

[42103 

[1173 

[13203 

£1173 

[10033 

[13803 

£24343 

£2433 

£1173 

£23363 

[1173 

[31263 

[16573 

£24563 

£16213 
£889 3 
£46703 


[60053 

£5553 

£69783 


£8323 

£12123 

£3503 
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Programme—i 


7760 txt8*="" [333] 

7770 1F kf I ag = 1 THEN txt8*="Neuer Saldo:": [4174] 
ELSE txt8*="Kontostand:" 

7780 PR 1 NT#8,STR ING*(wi,"):wert = ROUND(tk [4588] 
onto(0,1),2):GOSUB 8090:RETURN 

7790 txt8*=" "+konto*(n) [1118] 

7000 IF kf1ag=1 AND tkonto(n,1)<>0 THEN tx [2964] 
t8*=txt8*+" " + konto*(tkor>ta(n,1)) 

7810 txt8*=txt8*+SPACE*(wi-LEN< tx t8*)>:wer [5847] 
t = RQUND(tkonto (n, 0),2) 

7820 GOSUB 8090:GOTO 7750 [1895] 

7830 RESTORE 2450:FOR py=l TO 3:n=0:FOR px [2028] 
= 1 TO 3 

7840 READ txt*,txt8*:IF px=3 AND py = 3 AND [4594] 
bi(3,0)=1 THEN READ txt*,txt8* 

7850 IF py=1 AND px=3 AND bi(2,0)=l THEN t [4451] 
xt8*="Kurzf.Schulden" 

7860 IF bI(py,px)>0 THEN wert=ROUNDCbi(py, [3098] 
px),2):n=n+l:GOSUB 8090 

7870 IF n>0 AND px = 2 THEN PR INT#8,STR ING*C [2558] 
w i , " - " ) 

7880 NEXT:IF n>0 THEN PR INT#8,STR 1 NG*(wi," [2288] 

-") 

7890 NEXT:txt8$="" [1574] 

7900 IF bi(0,1)=-1 THEN IF bi(3,0)=l THEN [6802J 
txt8*="nicht gesichert!" ELSE txt8*="gesic 
hert! " 

7910 IF b1(0,1)=0 THEN txt8*=”h!chst kriti [1805] 
sch! " 

7920 txt8*="Die Liquiditft ist "+txt8* [2219] 

7930 IF bI(0,1)>0 THEN txt8*=txt8*+ "("+STR [2064] 
*(bi(0,l))+" )" 

7940 PR INT#8,txt8*:txt8*="" [1085] 

7950 IF bi(3,1)=0 OR bi<2,3>=0 THEN 8000 [1489] 

7960 IF bi(0,0)<0.5 THEN IF bi(0,0>=0 THEN [5097] 
txt8*="sehr sch 1 echt!"ELSE txt8* = "gering! 

7970 IF bi(0,0)>=0.5 THEN IF bi(0,0)>l THE [3743] 
N txt8* = "gut!" ELSE txt8* = "mC'ig!" 


7980 IF bi(0,0)>0 THEN txt8*="<"+ STR*<bi(0 [3115] 
,0>> + " ) " + tx t8* 

7990 txt8*="Die FremdfInazierung ist "+txt [3265] 
8$:PR INT#8,txt8* 

8000 RETURN [555] 

8010 tx11 * = "1NDIZ:"+LEFT#(tx tl*,7)+ tt /"+MID [2156] 
*<STR*<d3),2)+"-" 

8020 txtl*=">"+STRING*(wi-1-LEN < txtl* >,C4728] 
)+txtl*+STRlNG*(wi, 

8030 PRINT#8,txtl* [1087] 

8040 IF dl<d3 THEN txt8*=txt8*+” Korektu [38821 
rkopie vom" 

8050 txt8* = txt8* + STR*(ta)+" "+ mon* + STR*(ja [23621 
h > 

8060 txt8$ = " "+SPACE* <(wi\2)-(LEN(txt8*)\2 [30691 
)-l)+txt8*:PRINT#8,txt8* 

8070 PRINT#8,STRING*(wi:RETURN [23201 

8080 IF dl=101 THEN mo=l [1394] 

8084 txt8*=STR*(ta)+"."+MID*(STR*(mo),2)+" [14851 
"+txt8* 

8086 IF d1=101 THEN mo=13 [1461] 

8090 txt8* = txt8* + SPACE*(wi-LEN(txt8*)> [25261 

8100 tx t0* = STR*(wert):ze=1NSTR(RIGHT*(txt0 [17211 
*, 3) , " ) 

8110 IF ze=0 THEN txt0*=txt0*+".00" [17761 

8120 IF ze<>0 THEN txt0*=txt0*+STRING*(ze- [2987] 
1,"0") 

8130 txt8* = LEFT*(txt8*,wi-LEN(txt0*))+txt0 [35641 

* 

8140 PRINT#8,txt8*:RETURN [13271 

8145 ’ C117] 

8150 •##* PROGRAMM ENDE *** C2262] 

8160 » [1171 

8170 IF sf1ag=0 THEN mel=6:G0SUB 4010:RETU [8551 
RN 

8175 POKE &<B 1C8, 2: WINDOW#0, 2,71,5,23:GOSUB C2121] 
6080 

8180 CAT C963 

8190 END [110] 


Software-Schnell-Versand 


Schneider CPC Diskette 


Btggles.... 

8oab Jack. 

Boundrr.. 

Classic Invaders.. 
Colostss Chess 4.0 

Coabat lyn«. 

Space Invasion.... 
Crafton 1 funk.... 
Cyrus 11 Schach... 
Eden Blues. 

cm«. 

Equlnot. 

FalrlIght. 

ffpatar Pilot. 

Ghost'n*Gobi Ins... 

Glass. 

Hacker. 

IapossIble Mission 
Intern. Karate.... 

Kn 1gbt Gases. 

Kurs Fu Master.... 

Mandragore... 

Meltdovn. 

Meraald Madness... 

Mlndshadov. 

Mission llevator.. 

Mo«I«. 

Night Gunner. 

Pacific. 

Plag Pong. 

Pro Tennis........ 

Prodigy........... 

Sescue on froctalu 

Rooa len. 

Sabotrur. 

Sal Conbat. 

Saaantba Foa Poker 

Shogun.. 

Space Shuttle. 

Spfndtzzy. 

Starquake......... 

Saords 6 Sorcery.. 

Teapest. 

Tau Ceti. 

The 5. Aals. 

Ion*hast.... 

Turbo Esprit. 

May of Tlgar. 

«erner aach hin... 

Uho dares «los 11 . 
«Inter Gaaes...... 

larq. 

Zolds. 


45.90 

47.90 

39.90 

29.90 

49.90 

43.90 

47.90 
47.90 

47.90 

47.90 

49.90 

45.90 

47.90 

47.90 

39.90 

43.90 

47.90 

46.90 

39.90 

47.90 

47.90 

47.90 

47.90 
59,00 

47.90 

47.90 

47.90 

47.90 
47.90 
47.90 

47.90 

43.90 

47.90 

47.90 

47.90 
47,90 

47.90 

47.90 

47.90 

45.90 

37.90 

47.90 
59,00 
79.95 

47.90 

46.90 

47.90 

45.90 

47.90 

47.90 

45.90 
39,00 

46.90 


Schneider CPC Kassette 


■ack to thn Future.... 

Batnan. 

loab Jack. 

■onlder Daih 111. 

Coabat lyna. 

Crafton 6 Xunk. 

Cyres II Schach. 

Dragons talr. 

Oruld. 

Eden Blues. 

Elfte deutsch. 

Equlnoi. 

EaBasfc. 

Fa triIght. 

Frankle f.t. Hollywood 

Chost'n'GoblIns. 

Glider Uder. 

Gyroscope. 

laposslble Mission.... 
International Karate.. 

Knlght Rider. 

Kung Pu Master. 

Llghtforce. 

lords of nlddle Ages.. 

Mandragore... 

Meraald Madness. 

klndshado«. 

Missten Elevator. 

Monopoly.. 

Night Rider. 

Kodes of Jesod. 

Pacific. 

Plng Pong. 

. 

Pro Tennis. 

Rescue on Fractalus... 

Revolution. 

Rooa Ten. 

Sal Coabat.. 

Saa. Foa Strip Poker.. 

Shogun. 

Space Invasion. 

Space Shuttle. 

Spin Olxry. 

Strangeloop. 

Street Nivt. 

Saords 6 Sorcery. 

Teapest.... 

The 5. Aals. 

The Way of the Tiger.. 

Thing on i Spring. 

Toaahavk.. 

Wanted Cunfrtght. 

Werner - aach hU. 

Winter Gaaes. 


39.00 

79.90 

77.90 

79.90 
79,00 

36.90 

33.90 
79.95 

77.90 

33.90 
58,00 

79.90 
49.00 

35.90 
79.00 
79.00 

27.90 

19.90 

34.90 

79.90 

79.90 

79.90 

27.90 
39.00 

47.90 

34.90 
37,00 

79.90 

34.90 

79.90 
39,00 

79.90 

19.90 

29.90 

29.90 

34.90 

79.90 

79.90 

29.90 

79.90 

34.90 

78.90 

29.90 

36.90 

79.90 

79.90 

35.90 
39.00 

29.90 

34.90 

79.90 

34.90 

34.90 

34.90 

34.90 


Waldeck-Software 2870 Delmenhorst Ladenverkauf: 
Tulpenstraße 30 Tel.: 04221/1 6464 täglich 15.00 -18.00 
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[—Hardware 


SCHNEIDERWARE #6 



Seit der letzten Schneiderware ist die 
Zeit sicherlich wie im Fluge vergangen, 
wenn Sie zu den stolzen Besitzern einer 
Echtzeituhr gehören. In diesem Beitrag 
geht es wieder um parallele Ein- und 
Ausgabe. Aber keine Angst, die Cen- 
tronicskarte benötigen wir nur einmal. 
Diese Karte tut ja nun schon seit gerau¬ 
mer Zeit ihre Dienste. 


Für die Ansteuerung Ihrer Modell¬ 
eisenbahn oder der heimischen 
Lightshow benötigen Sie natürlich 
eine Schaltung, die die kleinen 
„Strömchen” der PIO in etwas lei¬ 
stungsfähigere „STRÖME” verwan¬ 
delt (siehe hierzu den Schaltungsvor¬ 
schlag in Bild 4). 


Ich möchte allen Modellbauern, 
Eisenbahnern, Regel- und Steuer¬ 
technikern sowie allen Verkehrspla¬ 
nern unter Ihnen eine wirklich uni¬ 
verselle EIN- und AUS-gabeschnitt- 
stelle in die Hand geben. Diese lei¬ 
stungsfähige Steckkarte beherbergt 
zwei der uns schon von der Centronics 
bekannten 8255 PIO’s (programmier¬ 
bare EIN- und AUS-gabeinterfaces). 
An den Bausteinen erkennen Sie, daß 
diese Schnittstelle sehr universell zu 
verwenden sein wird. 

Sie beherbergt vier Kanäle mit je 8 Bit 
Breite und zwei Kanäle mit je 8 Bit, 
die ihrerseits wieder getrennt als zwei 
4 Bit-Ein-/Ausgabeports program¬ 
mierbar sind. 


Die Technik in Kürze 


Die Karte besteht im wesentlichen 
aus der Adressdecodierung, die so 
universell ausgelegt ist, daß mittels 
Einstellung von Steckbrücken drei 
dieser Karten ansteuerbar sind. 

Der zweite Teil sind die Bausteine 
8255, die als 40-polige IC's leicht zu 
erkennen sind. Eine etwas unter¬ 
geordnete Rolle spielen die drei 
Treiberbausteine für die Kontroll- 
LED der Ports des Bausteins 1, die 
zwar nicht unbedingt notwendig, 
aber zum besseren Verständnis der 
Schaltung sehr zu empfehlen sind. 
Die Ausgänge der PIO’s sind alle auf 
eine 50-polige Steckerleiste herausge¬ 
führt, die sogar noch zwei Pins für die 
Spannungsversorgung der Leistungs¬ 
elektronik übrig läßt. 


Die Decodierung 

Damit unsere PIO-Karte auch richtig 
arbeitet, gehört eine vernünftige 
Adressdecodierung dazu. Schneider 
reserviert uns den Ausgabebereich 
von HEX &F8E0 - &F8FF. Die ersten 
acht Adressen werden von der Cen¬ 
tronics und einem Reservebereich be¬ 
legt. Die PIO-Karte ist mit zwei PIO’s 
8255 bestückt. Diese IC's benötigen 
allein acht Adressen aus diesem Be¬ 
reich. Die PIO 1 belegt die Adresse 
HEX &F8EB (Steuerwort) und die 
Kanäle A - C die Adresse HEX 
&F8E8 - EA. Das Steuerwort der PIO 
2 wird mit der Adresse HEX &F8EF 
und die Kanäle mit HEX &F8EC - 
&F8EE angesprochen. Wie Sie es 
schon von anderen Karten der 
„Schneiderware” erleben konnten, 
sind diese immer für Mehrfachnut¬ 
zung ausgelegt, so auch bei dieser. Sie 


können mittels Steckbrücken die De¬ 
codierung für drei unabhängig arbei¬ 
tende Karten einstellen. Die entspre¬ 
chende Belegung zeigt Tabelle 1. 

Die eigentliche Decodierung wird 
mit den IC's 74LS30 und dem ODER- 
Gatter realisiert. Ausgang 3 des 
ODER-Gatters ist dann LOW, wenn 
eine dieser Adressen angesprochen 
wird. Für das genaueste Herausfiltern 
der benötigten CS-Signale ist der Bau¬ 
stein 74LS154 verantwortlich. Dieser 
Baustein ist ein „1 aus 16 Decoder”, 
das heißt, daß er aus 16 möglichen Ein¬ 
gangskombinationen (AO - A3) eine 
einzelne „herausfischt”. Diese Aus¬ 
gänge führen an die Steckbrücken 
(JUMPER), womit man leicht den 
benötigten Bereich einstellen kann. 
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Tabelle 1: 

Adressräume der PIO-Karten 


Dabei müssen Sie natürlich die Vor¬ 
einstellung (DEFAULT) auftrennen. 
Die Brückenbelegung und die Adress¬ 
räume der einzelnen Karten ersehen 
Sie aus Tabelle 1. Über die Signale 
CS1 und CS2 werden die beiden PIO's 
ausgewählt. Die übrige Schaltung zum 
Betreiben der PIO's ist genauso wie 
Sie es aus der „Schneiderware #2" 
schon kennen. 



Schaltungsvorschlag einer Relaiskarte 
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Hardware—| 


In der Digitaltechnik gibt es die ver¬ 
schiedensten Gruppen von Schalt¬ 
gliedern, die innerhalb ihrer „Fa¬ 
milie'’ gleiche oder sehr ähnliche 
Merkmale aufweisen. Eine bedeuten¬ 
de Gruppe heißt TTL: (Transistor- 
Transistor-Logik). Eine typische 
TTL-Schaltung ist der „berühmte" 
7400. Dieses IC beinhaltet vier 
NAND-Glieder mit je zwei Eingän¬ 
gen. Natürlich kann man eine derar¬ 
tige Schaltung auch mit diskreten 
(einzelnen) Bauelementen aufbauen, 
jedoch zeigt Bild 1, daß ein solches 
Vorhaben selbst für einen Insider ein 
tollkühnes Unternehmen wäre. Man 
müßte die gesamten Betriebsbedin¬ 
gungen der Schaltung kennen bzw. 
errechnen können, um mit ihr zu ar¬ 
beiten. Da das aber nicht im Sinne 
der Miniaturisierung in der Elektro- 




Bild 1: 


Quelle: Siemens Daienbuch. Digilalschal 
tungen 76/71 

Innenschaltung 7400 


nik wäre, entstanden die „Integrierten 
Schaltkreise”. Der Hersteller berech¬ 
net für jedes IC die Betriebs-Kenn- 
und Grenzdaten und übermittelt sie 
dem Anwender in Form von Daten¬ 
blättern. Bei der Entwicklung der 
Integrierten Bausteine derTTL-Serie 
kristallisierten sich einige Bedingun¬ 
gen heraus, die eigentlich jeder, der 
diese IC's verwendet, beherzigen 
sollte. Die logischen Zustände T 
HIGH oder ’0' LOW werden ja in der 
Digitaltechnik in Form von Span¬ 
nungspegeln definiert. Wenn nun die 
Ein- oder Ausgänge der Gatter nicht 
richtig beschältet werden, können die 
logischen Zustände von nachfolgen¬ 
den Einheiten nicht richtig erkannt 
werden, denn auch diese arbeiten 
nach TTL-Gesetzmäßigkeiten. Der 


Hersteller gibt nun in Form einer Pe¬ 
gelvorschrift dem Anwender die ge¬ 
forderten Spannungspegel für TTL 
und C-MOS IC’s in Form eines 
Diagrammes bekannt (Bild 2). Aus 
diesem Diagramm ersehen Sie, daß 
ein logisches LOW-Signal noch bei 
einer Spannung von 0,4 Volt und ein 
logisches HIGH-Signal schon ab 
einer Spannung von 2,5 Volt als gültig 
erkannt wird. 
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jy •» r 'J , Quelle: Grundschallungen III, Pflaum Verlag, 

dJltU Z. München 

Pegelvorschrift TTL-Familie 


Wenn man nun z.B. an den Ausgang 
eines NAND-Gatters zehn und mehr 
Eingänge anderer logischer Gatter 
anschließen würde, ohne besondere 
Maßnahmen zu ergreifen, so würde 
irgendwann der Ausgang des NAND 
soweit in den „verbotenen” Bereich 
des Diagramms rutschen, daß nach¬ 
folgende Eingänge alles mögliche 
ausführen würden, nur nicht das, was 
sie eigentlich sollten. Das kommt da¬ 
her, weil sie schon ein HIGH erken¬ 
nen würden, obwohl es eigentlich 
noch ein LOW darstellen sollte und 
die ganze Logikdefinition käme 
durcheinander. 

Auch hier hat der Hersteller eine 
Hilfe bereitgestellt, den sogenannten 
Ausgangslastfaktor, „FAN OUT” ge¬ 
nannt. Dieser Faktor beinhaltet eine 
Zahl, die darüber Auskunft gibt, wie¬ 
viele Eingänge an einem Ausgang be¬ 
trieben werden können, ohne die 
logischen Pegel zu verfälschen. Für 
die Eingänge gibt es noch den soge¬ 
nannten „FAN IN”. Der FAN OUT 
der meisten TTL-Bausteine liegt in 
der Größenordnung von 10. Die Aus¬ 
gangsbeschaltung der TTL-Glieder 
ist auch in drei große Gruppen ein¬ 
zuteilen, den Gegentakt-Ausgängen. 
den Open Kollektor- und den 
T ristate-Ausgängen. 


TTL-kompatibel 

Sie haben nun einiges wissenswertes 
über Logikfamilien erfahren; jetzt 
wenden wir uns aber schnell wieder 
unserer PIO-Karte zu. Auf unserer 
Karte sind nun zwei Stück 8255 vorge¬ 


sehen. Jedes IC besitzt 24 Ausgänge, 
die Sie individuell beschälten kön¬ 
nen. Der Hersteller gibt an, daß dieser 
Baustein TTL-kompatibel ist. Das 
bedeutet: unabhängig in welcher 
Technik dieser Baustein hergestellt 
wird, er verhält sich im System wie ein 
Baustein aus der TTL-Familie und ist 
auch so zu behandeln. Das ist übri¬ 
gens bei fast allen Mikroprozessoren 
und deren Hilfsbausteinen so. 
Nachdem wir nun alle möglichen ex¬ 
ternen Geräte an unserer PIO betrei¬ 
ben wollen, ist es natürlich nötig, die 
Strömchen der PIO erst einmal kräf¬ 
tig zu verstärken. 

Wenn Sie an Bit 0 des Port A eine 
Leuchtdiode anschließen, reicht das 
zwar aus, sie zum Leuchten zu brin¬ 
gen, aber der entstandene Signalpe¬ 
gel ist wegen seiner Abschwächung für 
nachfolgende Schaltglieder viel zu 
schwach. 

Wir führen deshalb die Leuchtdio¬ 
den, die Ihnen eine Hilfe beim Ver¬ 
ständnis der Karte sein sollen, über 
Treiberbausteine heraus. Die Aus¬ 
gangsanschlüsse der PIO’s leiten wir 
zur weiteren Verwendung alle auf die 
50-polige Pfostenleisten, welche als 
Stiftleisten ausgeführt sein sollten. 
Damit man nun z.B. ein Relais an¬ 
steuern kann, müssen Ihnen einige 
Dinge bekannt sein: der Widerstand 
des Relais und die Betriebsspannung, 
in unserem Fall 5 Volt. Mit diesen 
Werten errechnet man den Strom, der 
zum Ansteuern des Relais durch des¬ 
sen Spule fließt, mit der Formel I=U/ 
R. Beispiel: 5V/1000hm = 50 mA 
(Milliampere). Danach kann man 
sich den Typ des Treibertransistors 
aussuchen. Geeignete Transistoren 
für diese Stromstärken sind die Ty¬ 
pen BC 237 (max. 200 mA) oder BC 
140 (max. 1 A ). Der Basisanschluß 
des jeweiligen Transistors wird über 
einen geeigneten Widerstand (1 - 10K) 
an die entsprechenden Ausgänge der 
PIO angeschlossen. Würde man das 
Relais direkt vom Ausgang der PIO 
ansteuern lassen, so würde sich der 
Baustein irgendwann sehr stark erhit¬ 
zen, da er den benötigten Strom nicht 
aufbringen kann, und sich dann in 
Wohlgefallen auflösen. 

Das Beispiel können Sie mit dem 
Schaltbild 2 nachvollziehen. Hier 
wird Port A des PIO 1 mit acht Re¬ 
laistreibern, bestehend aus acht 
Transistoren, ausgestattet. Selbstver¬ 
ständlich können Sie nach diesem 
Schema auch andere Schaltungen 
verwirklichen. Anregungen von Ihrer 
Seite hierzu sind jederzeit will¬ 
kommen. 
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Gesammelte Werke 

D;e SCHNEIDERWARE begann in Heft 
6/86 Ober den Platinenservice stehen Ih¬ 
nen alle Karten, von der Basisplatine bis 
zur PIO-Karte, zur Verfügung 


Die Preise: 

Basisplatine, unbestückt 24,90 DM 

dto., bestückt 62,90 DM 

Kabel 464/664 35,90 DM 

Kabel 6128 45,90 DM 

Centronics, unbestückt 17,90 DM 

dto., bestückt 79,90 DM 

V/24, unbestückt 29,80 DM 

dto , bestückt 139,90 DM 

Netzteil, unbestückt 17,90 DM 

dto, bestückt 119,90 DM 

Trafo 79,90 DM 

Karte und Trafo 184,90 DM 


PIO-Karte 

Diese Karte, ein (Parallel-Input-Output)-Bau 
stein, ermöglicht die Eingabe beliebiger In¬ 
formationen über Schalter o ä. und die An¬ 
steuerung beliebiger Peripherie über 48 (!) 
Kanäle und ist absolut frei programmierbar 
Die Programmierung und der Aufbau oer Kar 
te sind in SCHNEIDERWARE #6, Heft 
12/86, beschrieben Steuer- Meß- und Regef- 
vorgänge aller Art können mit Hilfe dieser 
Karte und geeigneter Software realisiert wer 
den. Für 24 der 48 Kanäle stehen in der Fer- 
tigversion Leuchtdioden zur Zustandsanzeige 
zur Verfügung, 

Die Preise: 

Platine, unbestückl 29,80 DM 

Karte geprüft 198,90 DM 


Hardware-Uhr 

Diese Karte, vorgestellt und beschrieben 
in Sehneiderware # 5, Heft 10/86, er aubt 
per komfortablen RSX-Befehlen die stän¬ 
dige Anzeige von Uhrzeit und Datum. Die¬ 
se Daten bleiben auch nach dem Aus¬ 
schalten des Rechners erhalten, da der 
Uhrenbaustein akkugepuffert ist Mittels 
der RSX- Befehle können Sie Echtzcitsleu- 
e r ungen aller Art realisieren oder einfach 
die aktuelle Zeit in eigene Programme ein¬ 
binden 


Die Preise: 

Platine, unbestückt 29,80 DM 

Karte, geprüft 99,90 DM 


Die SCHNEIDERWARE ist 
ein universelles Erweite¬ 
rungssystem für CPCs auf 
der Basis des bekannten 
ECB-Bussystems 
Dieses System läßt sich mit 
minimalen Adaptionsmaß¬ 
nahmen an alle Rechner 
mit Z80-CPU anschließen 
Für Ihren CPC brauchen 
Sie zunächst: 


1. Das passende Kabel 
(im Artikel beschrieben, 
wird im Platinenservice 
angeboten) 

2 Die Basisplatine (zur 
Umsetzung der Pinbe¬ 
legung CPC/ECB) 


Im Lauf der Serie wird für 
Einsteiger der Aufbau ei¬ 
nes 19"-Systems und die 
Integration der Karten in 
dieses Gehäuse beschrie¬ 
ben. Die Basisplatine be¬ 
steht aus beidseitig kupfer¬ 
beschichtetem glasfaser¬ 
verstärktem Epoxydharz 
und ist durchkontaktiert. 
Die Einsteckkarten sind 
einseitig beschichtet und 
aus dem gleichen Material 
wie die Basisplatine Die in 
den Fertiggeräten verwen¬ 
deten Bausteine sind von 
bester Qualität; die fertigen 
Geräte sind geprüft. Die in 
Heft 7/86 vorgestellte 
Centronics-Paralleischnitt- 
stelle ist gegenüber dem 
CPC-Druckerport vollstän¬ 
dig und vollkompatibel zu 
allen Geräten mit Centro- 
nics-Anschluß. 


Platinenservice 


Zahlungsbedingungen: 


Gesamtpreis zuzüglich 
5,— DM Porto/Verpak- 
kung (im Ausland 8,— DM 
Porto/Verpackung). 

Am einfachsten per Vor¬ 
kasse (Verrechnungs¬ 
scheck) oder als Nachnah¬ 
me zuzügl der Nachnah¬ 
megebühr (in das Ausland 
nicht möglich). 


Bitte Postkarte im 
Heft benutzen! 




Platine, unbestückt 

SCHNEIDERWARE ist in drei Versionen 
für Sie verfügbar Sie können nach Bau¬ 
plan selbst bauen, die fertig bestückten 
und geprüften Karten über den Platinen¬ 
service erhallen oder die unoestückte 
Platine erwerben Diese werden in Indu- 
striequalität gefertigt, sind verzinnt und 
gebohrt; doppelseitig Deschichtele Pla¬ 
tinen sind chemisch durchkontaktiert 
und geprüft. Hierbei haben Sie den Vor¬ 
teil, die Platine nicht selbst hersteilen zu 
müssen, jedoch die Bestückungskosten 
zu sparen und die Bauteile selbst einzu¬ 
kaufen 


PC Schneider International 

Postfach 250, 3440 Eschwege 




















































Hardware—i 


Um nun die Karte sofort testen zu 
können, und gleichzeitig eine Kon¬ 
trolle der Schaltzustände zu haben, 
wurden die LED-Reihen angeschlos¬ 
sen. Weil wir für die nachfolgende 
Schaltung den TTL-Pegel erhalten 
wollen, steuern wir die LED s über 
Treiber (74LS241) nach der eben be¬ 
schriebenen Methode an. Nun haben 
Sie eine sofortige Ein- und Ausga¬ 
bekontrolle Ihrer Daten. 

Wenn Sie an der 50-poligen Stecker¬ 
leiste Messungen machen wollen. 


möchte ich Ihnen zur besonderen 
Vorsicht raten, denn man ist schnell 
mit der Meßspitze abgerutscht und 
hat zwei Ausgänge kurzgeschlossen, 
was nicht selten den Baustein zer¬ 
stört. Port B wurde als Ausgang ver¬ 
schaltet, d.h. an ihm wurden soge¬ 
nannte PULLUP-Widerstände mon¬ 
tiert. Diese Widerstände bringen die 
Bausteineingänge dazu, nicht irgend 
etwas einzulesen, sondern in der 
Ruhestellung einen definierten Pegel 
anzunehmen. Deshalb leuchten 
auch die LEDs nach dem Einschal¬ 


ten Ihres CPC’s. Die Relaisplatine 
(siehe Schaltungsvorschlag) können 
Sie auch durch eine andere, von 
Ihnen selbst entwickelte Steuerung 
ersetzen. Ihrer Fantasie sind diesbe¬ 
züglich keinerlei Grenzen gesetzt. 


Tips zum Aufbau 


Sie sind ja mittlerweile schon Profi im 
Bestücken von Platinen. Aber trotz¬ 
dem sollten Sie auf die richtige 
Polung der IC’s und der Eikos achten. 
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I Hardware 


Die LED’s und' die dazugehörigen 
Treiberbausteine können Sie jeder¬ 
zeit weglassen, wenn Sie das Ge¬ 
blinke stört: es entlastet zumindest 
Ihren Bauteiletat. Sollten Sie die 
Ligthshow jedoch benötigen, so kann 
ich Ihnen rechteckförmige Leucht¬ 
dioden empfehlen. Wie Sie sicher 
wissen, sind Leuchtdioden kleine 
Stromfresser, was dem Netzteil im 
Schneider Monitor nicht besonders 
gefällt. 

Ich möchte Ihnen auf jeden Fall das 
Powernetzteil der „Schneiderware" 
empfehlen, sonst kann es unter 
Umständen dazu kommen, daß der 
CPC beim Einschalten gar kein Bild 
aufbaut, weil durch Ansprechen des 
Überlastschutzes die 5-Volt-Span- 
nung zusammenbricht. Das gilt aber 
nur für diejenigen unter Ihnen, die 
eine zweite Floppy am CPC betrei¬ 
ben, wodurch das Absinken der Be¬ 
triebsspannung die Leuchtdioden 
(Lichtschranken) der Floppystation 
ein zu kleines Signal liefern, w ; as zu 
Fehl Punktionen (Disc missing) füh¬ 
ren kann. 

Nach dem Bestücken und der obliga¬ 
torischen Endkontrolle können Sie 
nun Ihren Rechner wieder einschal¬ 


ten. Sollten die LED’s nach dem Ein¬ 
schalten leuchten, so hat das schon 
seine Richtigkeit, denn der 8255 be¬ 
findet sich nach dem Einschalten im 
Eingabezustand. Das wird sich nach 
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,± -Dl -24—-- 

' 1 »H - R211 >R22 - R29l |R30 - R37] 

Bestückungsplan PIO-Karte 
Schneiderware 
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dem ersten Initialisieren rasch än¬ 
dern. Nach dem gewohnten ’READY\ 
dem Jubelschrei, kann's losgehen. 

Stückliste: 

IC 1: 74LS30 
IC2: 74LS04 
IC3: 74LS30 
IC4: 74154 
IC5: 74LS32 
IC6: 8255 
IC7: 8255 

IC8-IC10: 74LS241 
CI: 22 tx 10V 

C2, C3, C5, C6, C7: 100 nF 
C4: 100 /jl 10V 

Stl: 64-pol.VG-Leiste 90 Grad 
St2: 32-pol. Pfostenleiste (2x16) 

St3: 50-pol. Pfostenleiste (2x25) 

RI: 1 kOhm 

R2 - R5: Widerstandsnetzwerk 
4x4,7 kOhm 

R6 - RI3: Widerstandsnetzwerk 
8x4,7 kOhm 

R14 - R21: Widerstandsnetzwerk 
8x270 Ohm 

R22 - R29: Widerstandsnetzwerk 
8x270 Ohm 

R30 - R37: Widerstandsnetzwork 
8x270 Ohm 

Dl - D24: LED (Farbe lt. Schaltbild) 
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STAR-WRITERI 


(464/664/6128) 

Das zur Zeit mit Abstand leistungsfähigste Textsystem für den CPC, das völlig neue MaBstäbe 
in Bedienung und Leistung setzt! 


Einfache Bedienung durch PULL-DOWN-Menues 
Deutsche DIN-Tastatur mit Aufkleber 
integrierte Adreßverwaltung im Direktzugriff 
Integriertes Grafikprogramm zur Erstellung von 
Briefköpfen 

Integriertes DFU-Programm für die Schneider-Schnittstelle 
Integrierter Zeicheneditor zur Erstellung von 10 Zei¬ 
chensätzen 

Anpaßbar an jeden Drucker der auf dem Markt erhältlich ist 
Grafiken können in Text eingebunden werden 
Basicprogramme können bearbeitet werden 
Komfortable Diskettenverwaltung (löschen, kopieren ) 
Ränder frei wählbar 
T rennvorschläge 
Zentrieren 

Formatierte Ausgabe auf dem Bildschirm 
Umfangreiche Blockoperationen 
Umformatieren auf andere Formate 
Zeichen einfügen und löschen 



• Zeilen einfugen und löschen 

• Absätze einfügen und löschen 

• Kopf- und Fußzeilen frei änderbar 

• Blocksatz 

• Flattersatz 

• Suchen und Ersetzen 

• Serienbrieffunktion 

• „MERGE'-Funktion 

• Fließtexteingabe 

• Wordwrap 

• Bausteinverarbeitung 

• 9 verschiedene Layouts 

• Proportionalschrift 

• Hervorhebungen wie: Unterstreichen, Fettdruck, Dop¬ 
peldruck, Kursiv, doppelte Breite, Schmalschrift, NLQ. 

• Mathematische Formelschreibweise (Hoch- und Tief¬ 
stellen) 

• Definierte Zeichensätze können auf entsprechendem 
Drucker ausgegeben werden (z B Russisch oder Fran¬ 
zösisch). 


Jetzt 

Version 3.0 


-\ 


m !/■ 9 * Mouse Operating System 

Das GEM* für den Schneider! 

M.O.S. ist eine neue Betriebssystem-Erweiterung für alle 
CPC-Rechner mit einem Diskettenlaufwerk. Das Programm 
kann mit Hilfe eines Joysticks oder einer Joystick-kompati¬ 
blen Maus (AMX, Reisware) gesteuert werden. 

M.O.S. verwandelt Ihren Schneider in einen neuen Computer, 
dem PULL-DOWN-Menues. ICON-Steuerung, grafische Be¬ 
nutzeroberfläche keine Fremdwörter mehr sind. 

M.O.S. ist nicht nur eine Betriebssystemerweiterung, die man 
nur unter Maschinensprache ansprechen kann, sondern 
wurde auch komplett in das hervorragende Schneider-Basic 
eingebunden 

Deshalb ist M O S. sowohl für den Laien als auch für den Profi 
interessant, denn endlich ist das Erstellen von benutzer¬ 
freundlichen Programmen schnell und ohne großen Aufwand 
möglich 


M.O.S. beinhaltet neben der eigentlichen Betriebssystemer¬ 
weiterung auch einen ICON-Designer, einen Zeicheneditor, 
einen MOUSE-Designer und ein sehr leistungsfähiges Grafik¬ 
programm mit Maus-/Joystick-Steuerung und vielen Funktio¬ 
nen 

M.O.S. erlaubt das gleichzeitige Öffnen von bis zu 20 Win¬ 
dows (Bildschirmfenster), 5 PULL-DOWN-Menues und 20 
ICONs Das Besondere hierbei ist aber, daß der Bildschirm¬ 
hintergrund gesichert wird Das heißt, wenn man ein Window/ 
Menue/Icon schließt, erscheint automatisch der alte 
Hintergrund auf dem Bildschirm zurück 

M.O.S. ist mit einem sehr ausführlichen deutschen Handbuch, 
das unter anderem alle dokumentierten Einsprünge in das 
M.O S -System enthält, auf 3-Zoll oder 5%-Zoll-Diskette 

für nur 98DM erhältlich 



COPY-STAR II 

ist die ideale Befehlserwei¬ 
terung für Druckerbesitzer, 
denn es stellt für alle gängi¬ 
gen Drucker Hardcopyfunk¬ 
tionen in verschiedenen 
Größen zur Verfügung So¬ 
gar Farbbilder lassen sich 
schattiert ausgeben 
COPY-STAR II können Sie 
leicht in eigene Programme 

einbinden. 

Preis: 29,90 Kassette 
39,90 Diskette 

V___ 


STATISTIC-STAR 

Eine Grafik sagt mehr als 10OO Zahlen 

Ein professionelles Grafik- und Statistic- 
programm zum Auswerten von Daten aller 
Art (Schule, Studium, Beruf, Hobby, Haus¬ 
halt ). 

• Linien-, Balken- und Tortengrafik 

• Betiteln von Grafiken 

• 400 Daten direkt im Speicher 

• Umfangreiche Editierfunktionen 

• Umfangreiche statistische Berechnungen 

• Hardcopyfunktion u v.m 

• Preis: 59,90 Kassette 

79,90 Diskette 


Beispielgrafik STATISTIC-STAR 



Weitere interessante Programme finden Sie in unserem ausführlichen Katalog! 



Vertrieb für die Schweiz. 

V (CS Video-Computershop 
Schaffhauserstraße 473 

PO Box 103, CH-8052 Zürich 
Telefon 01/3 02 2600 

Händleranfrage 

erwünscht 

Software-Autoren 

gesucht 

□ Senden Sie mir unverbindlich Ihren Katalog 

□ 6128 Q664 0464 QJOYCE 

□ Hiermit bestelle ich per Vorkasse/Nachnahme 

Vorname 

Name 

2120 LUNEBURG /=j r = 5F 


Straße 

= = = =.? s = = s=s 

Vertrieb für Österreich. 

Unsere Produkle sind 

Wohnort__ 

= jss? = 3= = — ta == zs; =? =.- 

Ueberreuter-Media 

Computer-Shops 

Datum/Unterschrift 




(Alle Preise verstehen sich als unverbindliche 


Telefon 4 81 53 80 

und Brinkmann 

Preisempfehlungen zzg 5.— DM Porto u Ver- 

• GEM isl eingetragenes Warenzeichen der Fa DIGITAL-flESEARCH Inc 


erhältlich! 

Packung) 
































^Hardware 


Auch Software gehört dazu 


Unsere PIO-Karte können Sie ganz 
bequem von BASIC aus bedienen. 
Listing 1 zeigt Ihnen ein kurzes 
Testprogramm. Dieses Programm 

Listing 1: 

Testprogramm "Ampel” 


10 :lb cgi: 

20 PRINT" ** AMPEL STEUERUNG MIT C P C 464 126641 
4 *" 

30 PPM 1373J 

100 REM Initialisierung Pia 12612] 

II« OUT »F6EB, N8A -Kanal a-c auf ausga 11876] 

Le 

200 REM «***start Ampelsteuerung 1911] 

210 REM 1272) 

220 REM 1272] 

250 j =6-3: GQSUB 6000 GOSOB 5200 13694] 

280 j=65:GOSUE 6000:GOSUE 5400 11675] 

270 J=3ö:GOSUE 6000: GOSUE 5200 C906] 

280 1 = 34 GOSUE 6000!GOSUE 5000 C1554J 

290 J-33:GCSUB 6000GOSUB 5400 12495] 

300 j =97:GOSUE 6000:GOSUE 5400 12109] 

•310 j=129: GOSUE G000.GO-3UB 5200 1330] 

320 j =65:GOSUE 6000.COSUB 5000 11197] 

330 j-33:GOSUE 6000-GOSUB 5200 12694] 

340 GOTO 5900 '5411 

1000 CLS: PRINT "Ampel Programm beendet " 13601] 

101® PRINT:FEINT:PRINT: PRINT:PRINT "Nochroa 167361 
1 — Taste drucken" : CALL 3iBB16:RUN 

4999 STOP 1464! 

5000 FEH Zeiten 2 sei 1565] 

5100 FQR sec2 =1 TO 2000 NEXT:RETURN 128653 

5200 REM Zeit 30 se c 14583 

5300 FOR sec30 =1 TO 10000: NEXT:RETUBN 115373 

54®0 SEM Zeit 4 sec 1709] 

5500 FOR sec4 =1 TO 4000: NEXT: RETURN 12220] 

5600 REM Zeit 0 5 sec fuer blinken 116953 

3700 FOR se-0.5 =1 TO 500;NEXT:RETURN 11995] 

5600 PBM Bllnkup [630] 

5900 FOR b=l TO 10:j”AF:GOSUE 7000:GOSIFB 5 I46S43 

600: Je0: GOSUB 7®00;GOSTIB 5600: NEXT 

5910 GOTO 100® 1339] 

6000 REM Ausgabe des da tonWortes 12275] 

6100 OUT SF6E8,J:RETURN 1377] 

7000 REM Ausgabe des Datenwortes ltanal c 12825) 
7100 OUT 4iF8EA.]: RETURN 187] 


Listing 2: 

Testprogramm ”Taster” -Stückliste 

10 CLS 191] 

20 OUT SF8EB, A8A 15291 

30 !F I NP <<6FBE91=255-128 THEN OUT &F6E3,5'F 135617 

F ELSE OUT SF8E8.0 

40 LOCATE 10, 10: PRINT 131NS-< INP< AF5E9>, 83 11996] 

50 GOTO 30 134®! 



SCHULTUHSSV0R5CHLBG 
HHHUELLE EINGABE B - KANAL 


Bild 5: 

Schaltungsvorschlag einer Tastereingabe 



Tabelle 2: 

Programmiermöglichkeiten 8255 


simuliert eine einfache Verkehrsam¬ 
pel, deren Funktion wohl jedem be¬ 
stens bekannt sein dürfte. Von der 
BASIC-Ebene aus muß man schon 
detaillierte Kenntnisse der Adresse 
und der internen Struktur des anzu¬ 
sprechenden Bausteines besitzen, um 
mit ihm zu arbeiten. 

Wie Sie aus früheren Beiträgen noch 
wissen, besitzt der 8255 vier Register, 
in denen man die gewünschte Be¬ 
triebsart übergibt. Dies muß man 
nicht bei jeder Ein- oder Ausgabe tun, 
sondern nur einmal zu Beginn oder 
wenn man die Betriebsart tatsächlich 
ändern möchte. Aus Tabelle 1 erse¬ 
hen Sie die Adressen, die notwendig 
sind, um die PIO zu betreiben. Der 
8255 benötigt weiterhin ein Steuer¬ 
wort, welches festlegt, ob ein be¬ 
stimmter Port in Eingabe- oder Aus¬ 
gabebetriebsart arbeiten soll. Diese 
erstmalige Initialisierung speichert 
der 8255 in seinem vierten Register, 
welches unter der letzten Adresse zu 
erreichen ist (PIO l=&F8EB/PIO 
2=&F8EF; jeweils AO+Al = HIGH). 
Die davorliegenden Adressen errei¬ 
chen die entsprechenden Ports (C, B 
und A). 

Die PIO 2 arbeitet nach den gleichen 
Spielregeln und den entsprechenden 
Adressen. Damit Sic nun Ihre Light¬ 
show beginnen können, geben Sie die 
folgenden acht Zeilen des Demopro¬ 
gramms ein. Der kleine Achtzeiler 
setzt die Kanäle B+C auf HIGH 
(LED's leuchten) und bringt den Ka¬ 
nal Azurn Blinken. Die Zeitdauer des 
Blinkrhythmus hängt von der Va¬ 
riablen X in Zeile 100 ab. 

10 OUT &F8EB,&80 

20 OUT &F8E8,&FF:GOSUB 100 

30 OUT &F8E9.&FF 

40 OUT &F8EA.&FF 

50 OUT &F8E8,&0ü:GOSUB 100 

60 GOTO 20 

100 FOR X=T TO 10üü:NEXT 
110 RETURN 

Dies war ein kleines Beispiel für eine 
Ausgabeoperation. Die Eingabe ge¬ 
staltet sich ähnlich. Nach der Initia¬ 
lisierung des 8255 in Zeile 10 ist Kanal 
B auf Eingabe und die Kanäle A+C 
auf Ausgabe geschaltet. In dieser Be¬ 
triebsart sollten die Leuchtdioden der 
Eingabekänale (B und eine Hälfte 
von C) leuchten, alle anderen LED's 
sollten dunkel sein. Das ist deshalb 
so, weil an den Kanälen, die zur Ein¬ 
gabe gedacht sind, sogenannte 
Pullup-Widerstände liegen, die den 
Eingabeport bei geöffnetem Schalter 
auf einem definierten Pegel halten 
sollen. Drückt man nun einen Taster 
(siehe Schaltungsvorschlag), so er¬ 


kennt der entsprechende Eingang 
einen LOW-Pegel, den er dem laufen¬ 
den BASIC-Programm zur weiteren 
Verarbeitung übergibt. Auch hierfür 
ein kleines Demoprogramm: 

10 OUT &f8EB,&8A 

20 LOCATE 10,10 

30 PRINT BIN$(INP(&F8E9),8) 

40 GOTO 20 

In diesen vier Zeilen steckt eine End¬ 
losschleife, die fortlaufend den Port 
C ausliest und den gelesenen Wert in 
binärer Schreibweise auf dem Moni¬ 
tor darstellt. Hier kann man sehr gut 
beobachten, wie sich die 'EINSEN' 
bei gedrückter Taste in eine 'NULL' 
verwandeln. Nun dürfte es Ihnen 
sicher nicht schwer fallen, die beiden 
Programme so zu verknüpfen, so daß 
der eben gelesene Wert auch gleich 
wieder am Kanal A ausgegeben wird. 
Sollte es einmal nötig sein, einzelne 
Bits auszugeben, so sollten Sie die 
logischen BASIC-Funktionen AND 
und OR anwenden. Wenn Sie ein Bit 
setzen wollen, müssen Sie den auszu¬ 
gebenden Wert mit einer Zahl (OR) 
ODER-ieren. Wenn Sie Bits löschen 
wollen, entsprechend UND-ieren. 
Der Wert der Zahl (MASKE) richtet 
sich nach den zu setzenden oder zu 
löschenden Bits. Beispiel 1: Bits 
setzen: 

A = 01010110 
MASKE =11110000 


AOR MASKE = 11110110 
Fazit: 

Die Binärstellen, die zu setzen sind, 
müssen auf EINS (HIGH) liegen. 

Beispiel 2: 

Bits löschen: 

A = 10111001 
MASKE = 11110000 


A AND MASKE = 10110000 
Fazit: 

Um Bits zu löschen, müssen die Stel¬ 
len der zu löschenden Bits mit NUL¬ 
LEN (LOW) belegt werden. 

Eine Abfrage einzelner Bits ist mit 
letzterem Vorschlag ebenfalls mög¬ 
lich, da die Variable A unverfälscht 
an den Stellen „durchgereicht" wird, 
wo in der Maske EINSEN stehen, 
siehe am Beispiel. 

Eine Übersicht über die Program¬ 
miermöglichkeiten des 8255 gibt Ta¬ 
belle 2. Wer sich näher mit der PIO 
8255 befassen möchte, den verweise 
ich auf die entsprechende Fachlite¬ 
ratur der Firma INTEL. 
Schneiderware #7 wird Ihnen eine 
A/D-Wandlerkarte präsentieren. 

(P. Richter/ME) 
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Brandneues Special 


von 



Auf dieses Heft haben 
die Computer-Freaks 
schon lange gewartet! 
Mit dieser Zeitschrift 
haben Sie die Möglich¬ 
keit sich Ihre entspre¬ 
chende Schnittstelle 
selbst zu bauen. 



Hier ein kleiner Themenauszug; 


Grundlagen 

Info-Artikel über Sinn, Zweck und An¬ 
wendungsmöglichkeiten von Interfaces, 
z.B. zur Steuerung von Robotern oder 
das Messen von Lautsprecherboxen 

Marktberichte 

Übersicht von industriell hergestellten 
Interfaces und Zubehör 

Bauanleitungen 

* verschiedene Computer und Periphe¬ 
riegeräte sind anschließbar 


* RS232/Centronics-Schnittstelle 

* RS232-Analysator 

* C64/128-Schnittstelle 

* C64 Kassetteninterface 
% MSX-Erweiterungen 

* I/O-Erweiterung für MSX-Computer 

* Modem mit Selbstwahl-Interface 

* Universeller I/O-BUS 

* I/O-BUS-Karte Serielle Schnittstelle 

* I/O-BUS-Karte Kanalwähler 

* I/O-BUS-Karte Analogeingang 

* I/O-BUS-Karte Echtzeituhr 


Schauen Sie mal rein, es lohnt sich! 


Erscheinungstermin ist am Direkt beim Verlag oder im Fachhandel 

21.November 1986 erhältlich, DM 15,— 

Elektor Verlag, Süsterfeldstr. 25, 5100 Aachen 
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Das vierte Programm 


...im heimischen TV-Apparat stellt 
Ihnen ein neues Produkt der Gattung 
RGB-Modulator zur Verfügung, wel¬ 
ches allerdings mit der Schneider- 
MP-Serie nicht zu vergleichen ist. 
Die Rede ist von einem soeben von 


Gerät Vorderansicht 

der Firma Turba EDV-Partner auf 
den Markt gebrachten Modulator, 
der das vom CPC zur Verfügung ge¬ 
stellte RGB-Signal wahlweise in ein 
Video- oder VHF-Signal umwandelt. 
Der VHF-Ausgang wird direkt an den 
Antenneneingang des heimischen 


TV-Gerätes angeschlossen und er¬ 
zeugt auf den Kanälen I - V das vom 
CPC erstellte Bild. Dieses Bild ist 
durch die eigentlich widernatürliche 
Wandlung des Bildsignals qualitativ 
nicht mit einem durch ein FBAS- 


oder RGB-Signal erzeugten Bild zu 
vergleichen; die Arbeit im 80- 
Zeichen-Modus ist hier wenig 
sinnvoll. Ausgezeichnet hingegen ist 
das Bild, welches vom Videoausgang 
des Modulators aus in eine vorhan¬ 
dene AV-Buchse eingespeist wird. 


Dieses FBAS-Signal stellt der Modu¬ 
lator mit der genormten Spannung 
von lVss zur Verfügung. Mit einem 
auf der Geräterückseite installierten 
Schalter kann zwischen den als 
Cinch-Buchsen ausgeführten VHF- 
und Videoausgängen umgeschaltet 
werden. 

Zur Übertragung des Tones stehen 
ein separater Eingang und Modu¬ 
lator zur Verfügung. 

Da bei Wegfall des Schneider- 
Monitors auch die Speisespannun¬ 
gen für Rechner und Floppylaufwerk 
fehlen, stellt der Modulator diese 
Spannungen mit einem Strom von je¬ 
weils 2A zur Verfügung. Diese Span¬ 
nungen sind thermisch und gegen 
Überspannungen abgesichert. Durch 
einen leistungsfähigen Ringkemtrans- 
formator wurde eine geringe Streu¬ 
strahlung und eine sehr flache Bau¬ 
weise (Höhe; 50 mm) erreicht. Das 
Gehäuse besteht aus Stahlblech und 
integrierten Aluminiumkühlkörpern; 
eine wirklich stabile Angelegenheit. 
Zu den Schneider-Modulatoren wird 
dieses Gerät schon durch das kräftige 
Netzteil und den zusätzlichen Video¬ 
ausgang zu einer Alternative. 

Zusammenfassung der Daten: 

- VHF-Ausgang Kanäle I - V 

- Video-Ausgang lVss 

- Speisespannungen 5V/2A, 12V/2A 

- separater Toneingang 

- solides Metallgehäuse 
-Preis: ca. 221,50 DM 

- Vertrieb: EDV-Partner, 

7000 Stuttgart 1 

(ME) 



PC-Emulator für die CPC’s - 

Beschleunigung mit Hindernissen 

Die Firma Kersten und Partner bietet 
ab Ende Oktober ein low-cost- 
Nachfolgemodell ihres PC-Emulators 
für die Schneider CPC’s an. Dieser 
Emulator betrachtet den angeschlos¬ 
senen CPC als eine PC-Farbgrafik- 
karte und reduziert die aktive 
Hardware des Schneider auf den 
Bildschirmaufbau, die Tastatur- 
und Druckerschnittstellenverwaltung. 
Nach dem Anschluß des Emulators 
, an den Expansionsport des CPC wird 
die Umschaltung durch den Befehl 
’IPC’ gestartet. Der Emulator führt 
hierauf einen Hardwaretest durch 
und bootet anschließend das Be¬ 
triebssystem MSDOS. Dieses muß al¬ 
lerdings vom Anwender erworben 
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Der Einstieg 

in die 

ScHNElDER-PC'WELT 



WINDOW ADRESS DM 98,- 

Verwaltung beliebig vieler Adressen: Adressen verwalten, 
anzeigen, 5 verschiedene Sortierungen, Etikettenausdruck, 

Übergabe an Textverarbeitung 

WINDOW KASSE DM 98,- 

Kommerzielle Kassenbuchführung mit Einnahmen, Ausgaben, 

Kassenbuch anzeigen, Kassenbuch drucken, Reorganisieren. 

CARAT AUFTRAG PC DM 998,- 

Auftragsabwicklung mit: Artikelverzeichnis, Kunden, Lie¬ 
feranten, Einkauf, Verkauf, Statistik, OP-Listen mit Mahn¬ 
wesen, Voreinstellungen, Texteditor und ... 

CARAT LAGER PC DM 298,- 

Lagerhaltung: Voreinstellungen, Artikelverzeichnis, Lie¬ 
feranten, Wareneinkauf, Lagerverwaltung, Statistiken und ... 

AGENTUR DM1.200,- 

Versicherungsprogramm: Kundendatei, Versicherungsdatei, No¬ 
tizbuch, Terminübersicht, Brieffunktion, Verkaufslisten, 

Reisekostenabrechnung, Provisionen und .... 

BIBLIOMAT DM 298,- 

Branchenlösung für den Buchhandel: Bücher verwalten, Ver¬ 
lage verwalten, Lagerhaltung, Bücherverkauf und ... 





























[-Hardware 


werden. Hiernach kann jegliche 
unter MSDOS arbeitende Software 
geladen werden; dies allerdings nicht 
ohne Einschränkung. Neben der 
durch notwendige Anpassungsmaß¬ 
nahmen sehr langsam gewordenen 
Bildaufbereitung, ergab sich bei 
mehreren Programmen ein wirrer 
Bildschirmaufbau; andere Software 
verweigerte schon in der Ladephase 
die Zusammenarbeit. PC-Interessen- 
len sollten sich vor dem Erwerb des 
Emulators die Lauffähigkeit bzw. die 
Anpaßbarkeit der gewünschten 
Software bescheinigen lassen. 

Die Tastaturbelegung ist auf die 
Möglichkeiten der CPC's zugeschnit¬ 
ten; lediglich die auf PC-Keyboards 
vorhandenen Tasten ALT und FO 


werden auf dem CPC simuliert. 
Weiterhin werden einige Sonder¬ 
funktionen einer PC-Tastatur durch 
gleichzeitiges Betätigen von ENTER 
und der gewünschten Taste nach¬ 
geahmt. Durch ENTER + ESC kann 
der Emulator vom CPC abgekoppelt 
werden. Ersterer geht dann weiter sei¬ 
ner Arbeit nach, während der CPC 
zur Arbeit in BASIC verwendet wer¬ 
den kann. Die Eingabe von IPC Star¬ 
let dann wiederden Emulatorbetrieb. 
Für weitergehende Anwendungen 
sind vom Hersteller folgende Soft¬ 
wareerweiterungen geplant: 

- Grafikhardcopy auf CPC-Drucker 
-Verwendung des Emulator-RAM 

als RAM-Floppy für den CPC 

- Verwendung des Emulator-Lauf¬ 


werks als Zweitlaufwerk des CPC 

- Datenaustausch zwischen CP/M 
und MSDOS 

Die Daten des Emulators: 

- Prozessor V 20 mit 5 MHz-Takt 

- Hauptspeicher 256 KB, erweiterbar 
auf 512 KB 

- 5,25"-Laufwerk mit 360 KB 

- Harddisk oder Floppylaufwerk über 
Expanionsbox nachrüstbar 

- CPC-Expansionsport durchgeschleift 

- Preis für Expansionsbox mit 5,25”- 
Zweitlaufwerk; ca. 300 - DM 

- Preis für PC-Emulator II, Grund¬ 
version mit einem Laufwerk und 
256 KB RAM ohne Betriebssystem 
MSDOS: ca. 1098 - DM 

Vertrieb: Kersten & Partner, 

5100 Aachen 

(ME) 


Knack die Nuß 


ln dieser Rubrik werden selbst die här¬ 
testen Nüsse „geknackt”. Denksport¬ 
aufgaben mit Hilfe des Computers ge¬ 
löst - so lautet unsere Devise. 

Der folgende Beitrag stammt von 
unserem Leser Andreas Dörfler aus 
Bielefeld. Andreas Dörfler ist 18 
Jahre alt, und studiert im zweiten Se¬ 
mester Biologie an der Universität 
Bielefeld. Er ist ein begeisterter CPC 
464-Anwender mit Drucker NLQ 401 
und programmiert in Basic, Assem¬ 
bler und Pascal. Den CPC setzt An¬ 
dreas hauptsächlich zur Textverarbei¬ 
tung und zum Programmieren von 
Anwenderprogrammen wissenschaft¬ 
licher Art (Molekulargenetik) ein, 
zum Spielen benutzt er ihn seltener. 

Nun zum Problem: 

Aus 25 schwarzen und 25 weißen Stei¬ 
nen muß eine geschlossene Kette so 
zusammengesetzt werden, daß, wenn 
man jeweils den n-ten Stein aus ihr 
entfernt, erst alle 25 schwarzen Steine 


entfernt werden, und dann erst die 
weißen. 

Die Lösung für dieses Problem ist 
leicht, für den Fall, daß jeder zweite 
Stein entfernt werden muß: 

Die Steinfolge müßte dann so ausse- 
hen: weiß-schwarz-weiß-schwarz- 
weiß-schwarz... 

Wird jeder zweite Stein entfernt, so 
werden erst alle 25 schwarzen Steine 
entfernt, dann erst die weißen. Man 
muß die Kette genau einmal durch¬ 
gehen, um alle schwarzen Steine zu 
nehmen. Nimmt man jeden dritten 
Stein, braucht man schon 1 1/2 
Durchgänge, bei jedem 123-ten Stein 
sind es schon einige mehr: hier darf 
uns unser CPC vor einem Geisteskol¬ 
laps bewahren. Trotzdem sollte der 
Leser an diesem Punkt erst in die Ta¬ 
sten seines CPC hacken, bevor er 
weiterliest! 

Nun zum Programm: 

Der Kern des Programmes beginnt 
ab Zeile 90. Die Schleife beschreibt 


genau einen Kettendurchgang. Bei je¬ 
dem neuen Durchgang hat die Varia¬ 
ble m den Wert 1 (erster Stein der 
Kette), die Variable n die Laufnum- 
mer(alsoz.B.51 fürStein 1 im zweiten 
Durchgang). 

Wird ein Stein schwarz gesetzt, dann 
verringert sich anzahls um den Wert 1. 

Wenn anzahls gleich 0 ist, dann 
wird der Schleifendurchgang been¬ 
det. Zeile 100 testet, ob der derzeitige 
Stein bereits schwarz ist: Ist er es, 
dann darf er nicht noch einmal 
schwarz gesetzt werden (goto 120). Ist 
er schwarz, dann wird außerdem die 
Variable c, die von n abzuziehen ist, 
um den Wert 1 erhöht. 

Zeile 110 schließlich setzt einen Stein 
schwarz, wenn seine Laufnummer n- 
c ein ganzzahliges Vielfaches der Va¬ 
riablen stein ist. Die Zeilen 170 - 230 
dienen der Ausgabe der Steinfolge. 

(Andreas Dörfler) 


20 'Kettenproblem von Andreas Doerfler C1607] 
30 '*********************** [5773 

40 MODE 2:anzahls=25:anzahlw=25:DIM x*(50) [2784] 
50 FOR i= 1 TO 50:x*<i>="w":NEXT [2321] 

60 INPUT” Jeder wievielte Stein soll herau [6433] 
sgenommen werden stein:PRINT 

70 durchgang=l:c=0:m=l [1075] 

80 ' [117] 

90 FOR n^durchgang TO durchgang+49 [1808] 

100 IF x®<m)=”s" THEN c=c+l:GOTO 120 [1386] 

110 IF (<n~c)/stein)=ROUND (<n-c)/stein>TH 138541 
EN x*<m>="s": anzahls=anzahls-l 

120 IF anzahls=0 THEN 170 [871] 


130 m=m+l [200] 

140 NEXT [350] 

150 m=l: durchgang=durchgang+50 [1344] 

160 GOTO 90 [3121 

170 'Ausgabe [572J 

180 PRINT" Jeder stein;”te Stein kann au [5951] 

s der Kette berausgenammen werden.” 

190 PRINT:PRINT:PRINT" Steinfolge [2829] 

PRINT 

200 FOR i- 1 TO 50 [531] 

210 PRINT x$<i>; [7633 

220 NEXT [350] 

230 PRINT:PRINT:END [10183 
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— Das ist die Software zum PC Magazin — 


Einzelbezugspreise für DATABOX: 

Diskette 3" 24— DM zuzüglich 3— DM Porto/Ver¬ 
packung (im Ausland zuzüglich 5,— DM Porto/Ver¬ 
packung) 


Das Databox-Abo kostet: 

Als Kassette für 1/2 Jahr (6 Lieferungen): 


Im Inland und West-Berlin.90,— DM 

Im europäischen Ausland.100—DM 

Im außereuropäischen Ausland..120— DM 


DATABOX: 


— mehr als der übliche Soft¬ 
wareservice 

— bringt ergänzend sämtli 
che Listings der jeweiligen 
Zeitschrift und alle Pro¬ 
grammbeispiele auf Kas¬ 
sette oder auf 3’ : Diskette. 

— Programme sind, soweit 
systembedingt möglich, 
auf allen drei CPC- 
Modelten lauffähig. Einzel¬ 
heiten entnehmen Sie bit¬ 
te der nebenstehenden 
Aufstellung. 

— erscheint jeden Monat 
und trägt das Titelbild des 
gleichzeitig erscheinen¬ 
den Heftes 

— der Datenträger zum PC 
Schneider International 
enthält außerdem jedes¬ 
mal ein zusätzliches Bo¬ 
nusprogramm, das nicht 
m Heft abgedruckt ist 


Für alle CPC’s als Kas¬ 
sette und 3” Diskette. 
Auch als Abonnement 
mit Preisvorteil erhältlich. 


464 664 6128 

• • • 


Inhalt der Databox zu Heft 
12 / 86 : 

Programm 

Prokyon • 

Habil • 

Printer Basic Loader • 

Printer Basic Datas • 

Multimode Datas • 

Multimode Demo • 

Indextabelle • 

Eras Com Datas • 

FiII Datas • 

Pattern Datas • 

Pattern Fill Demo • 

Mini Schach • 

MSchach Modifikation • 

Taster (PIO) • 

Ampel (PIO) • 

Ronusnrocramm • 


Kassette 14— DM zuzüglich Porto/Verpackung (im 
Ausland zuzüglich 5— DM Porto/Verpackung). 


Als Diskette für 1/2 Jahr (6 Lieferungen): 


Im Inland und West-Berlin.150,— DM 

Im europäischen Ausland.160— DM 

Im außereuropäischen Ausland.180— DM 


Zahlungsweise: 

Am einfachsten per Vorkasse (Verrechnungs¬ 
scheck) oder als Nachnahme zuzüglich der Nach¬ 
nahmegebühr (in das Ausland ist Nachnahme 
nicht möglich). 

Preisvorteil durch Databox-Abo: 

Unser beliebter Databox-Service kann ab sofort 
auch im Abonnement bezogen werden. Dadurch 
sparen Sie Mühe und haben außerdem noch ei¬ 
nen Preisvorteil gegenüber dem Einzelbezug 


Als Kassette für 1 Jahr (12 Lieferungen): 


Im Inland und West-Berlin. 180— DM 

Im europäischen Ausland.200— DM 

Im außereuropäischen Ausland.240— DM 

Als Diskette für 1 Jahr (12 Lieferungen): 

Im Inland und Westberlin.300— DM 

Im europäischen Ausland.320,— DM 

Im außereuropäischen Ausland.360— DM 


In den vorgenannten Preisen sind die Versand- 
und Verpackungskosten enthalten Bitte benutzen 
Sie für Ihre Bestellung die Abo-Karte. 


PC Schneider international 

Postfach 250, 3440 Eschwege 


Bitte Bestellkarte benutzen 
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LSP-IO: klein, 

Der Citizen LSP-10 ist ein recht jun¬ 
ger Sprößling aus dem Stamme der 
Matrixdrucker, der zumindest preis¬ 
lich als Partner für die Homecompu¬ 
terklasse konzipiert ist. Die Lei¬ 
stungsmerkmale dieses Druckers je¬ 
doch lassen ihn auch in der 
Zusammenarbeit mit der PC-Klasse 
nicht als überfordert erscheinen. Die 
wirklich komplette Ausstattung und 
die Fülle der Epson- oder IBM- 
kompatiblen Steuercodes (umschalt- 
bar per DIP-Schalter) lassen beim 
Anwender keine Wünsche offen. 

Die Mechanik 

ist vertrauenerweckend; der Druck¬ 
kopfist stabil auf der Führungsachse 
geführt; dies dokumentiert sich durch 
eine gerade und dichte Unterstrei¬ 
chungslinie (siehe Demo-Ausdruck). 
Jedoch könnte der Druckkopf besser 
gekühlt werden; nach einem Testaus¬ 
druck von einer Stunde Dauer war die 
Druckkopftemperatur auf über 45°C 
angestiegen. Der normale Gebrauch 
des Druckers wird solche Marathon¬ 
läufe wohl nicht beinhalten, jedoch 
könnte hier vom Hersteller präventiv 
Gutes getan werden. 

Im Lieferumfang enthalten ist auch 
ein Traktoraufsatz für Endlospapier; 
eine gute Strategie, wie ich meine, da 


aber fein 


die meisten Anwendungen wohl 
doch mit Endlospapier realisiert wer¬ 
den und ein nachgerüsteter Traktor¬ 
aufsatz doch meist mit ver¬ 
gleichsweise hohen Kosten verbun¬ 
den ist. Jedoch sei hier die fehlende 
Papierabrißkante erwähnt. 


NLQ 

Bild I: NLQ 6-fach vergrößert 

Die DIP-Schalter zur Einstellung 
einiger Standardfunkiionen sind 
nach Entfernen der Plexiglashaube 
und eines kleinen Deckels auf dem 
Grund des Druckkopfschachtes 
zugänglich. 

Die Datenübertragung geschieht 
überein in die rechte Geräleseite ein¬ 
steckbares Schnittstellenmodul, wel¬ 
ches als Zubehör erhältlich ist. 
Hierzu stehen wahlweise ein Centro¬ 
nics- und ein RS 232-ModuI zur 
Verfügung. 


Die Ansteuerung 

Hier steht, wie eingangs schon er¬ 
wähnt, die komplette Palette der 
Epson- und IBM-Steuerbefehle zur 
Verfügung. Die Kombinationsmög- 
lichkeiten der Schrift- und Hervorhe¬ 
bungsarten entnehmen Sie bitte dem 
Testausdruck. Einzelpunktgrafik 
kann in Dichten von 480. 960 und 
1920 Punkten/Zeile zu Papier ge¬ 
bracht werden. Diese Dichten wer¬ 
den von den meisten Grafik- und 
Hardcopyprogrammen unterstützt, 
was die Universalität dieses Druckers 
unterstreicht. 

Erwähnenswert ist auch die für einen 
Matrixdrucker dieser Preisklasse 
ausgezeichnete NLQ; bei der sechsfa¬ 
chen Vergrößerung sind kaum noch 
einzelne Punkte zu erkennen. 

Der Geräuschpegel des LSP-10 ist als 
normal zu bezeichnen. 

Fazit 

Der LSP-10 hat aufgrund seiner Viel¬ 
seitigkeit ein ausgezeichnetes Preis-/ 
Leistungsverhältnis. Trotz der er¬ 
wähnten Mängel steht dem User ein 
ausgezeichnetes Werkzeug zur Verfü¬ 
gung; die Hardware ist für die Lei¬ 
stungsfähigkeit der Software nicht 
unterdimensioniert. 

Die Daten 

- Steuercodes kompatibel zu Epson- 
und IBM-Standard, per DIP-Schal¬ 
ter umschaltbar 
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Hardware | 


- Druckgeschwindigkeit 120 Z/sec bei 
Entwurfs druck, 25 Z/sec NLQ 

- Bidirektionaler, druckwegoptimier¬ 
ter Ausdruck 

- Max. Auflösung horizontal 1920 
Punkte/Zeile 

- Plottermodus I und II 

- Traktoraufsatz serienmäßig 

- Schnittstellenmodule (wahlweise 
Centronics parallel oder RS 232 
seriell) als Zubehör 

- Druckkopflebensdauer 100 Mio. 
Zeichen 

- Preis LSP-10: ca. 898- DM 

- Preis Schnittstellenmodul: 
ca. 198 - DM 

- Vertrieb: Synelec GmbH, 

8000 München 15 

(ME) 


Standardzeichensatz 

! "#*'/.& ' ()*+,-. /0123456789: ; ( = > ?@ABCDEFGHIJKLM 
PQRBTIJVWXYZ C\ 3 abcde fgh i jklmnopqrstuvwxyz C i 3' 

Sonderzeichen 

L\: ( ! J'''*£§ 6 üö ÄöüäöüiäC \ ] C! 
f€0Ä».ea' v 'ÄoÄäöHü < ’ \ääb &i i mc 913 


Sehr i ftarten 

Dies ist Text in Near-Letter-Qua 1 ity , e n 1 s. r- g & ci und Condensed 

Dies ist Text im Elite - Schriftmodus , enlarged und Condensed 

Dies ist Text im Pica - Schriftmodus , en larged und Condensed 

Dies ist NLQ im I ta 1 i c-Modus, & n J sc r & & cf und Condensed 

Dies ist Elite i» Italic-Modus f e n 1 st r* e und Condensed 

Dies ist Pica im Ital i c-Modus f err i arged und Condensed 

Dies ist der FETTSCHRIFT — Modus, en X arged und emdensed 

Dies ist der Doppelanschlag-Modus, e r-* 1 ä r'g «== ö und Condensed 

Weitere Moeg1ichkeiten 

NLQ • Text "“‘"'und ... i. .dabei unterstrichen 

Elite : Te >: t hBeh -und ti.<...t.n t .dabei unterstrichen 

EÄ£ä_ 5 Tex t und n. Jn .. t .n, . dab e i unterstrichen 

Bild 2: Testausdruck 


HPX-84: 
Ein Plotter für 
die CPC’s 



Das Dilemma liegt auf der Hand: 
mühsam mit einem (ohnehin teuren) 
CAD-Programm erstellte Zeichnun¬ 
gen und Grafiken sollen zu Papier ge¬ 
bracht werden. Dies erledigt ein 
Matrixdrucker mit einer nicht ge¬ 
sellschaftsfähigen Qualität; für eine 
intelligente Zeichenmaschine jedoch 
muß der interessierte Anwender noch 
Beträge in der Größenordnung von 
3000,- DM aufwärts über die Laden¬ 
theke des Händlers schieben. 

Eine Alternative, die auch das 
Preisverhältnis Rechncr/Plotter in 
ein besseres Licht setzt, bietet der 
DIN-A 3-Flachbettplotter HPX-84 von 
Habersetzer. Diese Maschine ist in 
mehreren Komplettversionen schon 
ab ca. 1200 - DM zu erhalten. 

Die Einschränkung, die den Besit¬ 
zern des Plotters durch diesen Preis 
auferlegt wird, sei gleich zu Beginn 
genannt: Durch den Verzicht auf eine 
aufwendige Mechanik, beschränkt 
sich die Stiftgeschwindigkeit auf max. 
120 mm/sec. pro Achse bei einer Auf¬ 
lösung von 0,1 mm. Bei 0,05 mm Auf¬ 
lösung beträgt die Geschwindigkeit 
max. 70 mm/sec., bei 0,025 mm ge¬ 
rade noch 35 mm/sec. 

Die bei diesen Geschwindigkeiten er¬ 


reichte Präzision steht jedoch dervon 
wesentlich teureren Geräten nicht 
nach; die Wiederholgenauigkeit 
(vom Hersteller mit 0,1 mm angege¬ 
ben) wurde nach wahllosen „Schlit¬ 
tenfahrten” auf einem DIN-A 3-Bogen 
deutlich übertroffen. 

Die Ansteucrung des HPX-84 im 
Online-Betrieb erfolgt über die 
Druckerschnittstelle per BASIC- 
Befehl ’PRINT#8’ oder direkte An¬ 
sprache des Druckerports. Der 
Wortschatz des Plotters umfaßt nur 
23 Befehle, was u.U. auf mangelnden 
Bedienungskomfort schließen lassen 


könnte; bei der Erstellung eigener 
Treiberprogramme aber durch die 
Unkompliziertheit der Sprache von 
großem Vorteil ist. 

HPX-84-Anwender sind übrigens in 
Sachen Treiberprogramme bestens 
versorgt: für die bekannten CAD- 
Programme MICA (CPC’s und an¬ 
dere) und PIC (PC’s und kompatible) 
stehen anpaßbare Treiber zur Verfü¬ 
gung; des weiteren zeigt sich die 
Firma Habersetzer um die Behebung 
von Anpassungsproblemen sehr 
bemüht. 
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Für den systembedingt etwas einge¬ 
schränkten Anwendungsbereich der 
CPC's als CAD-Rechner, erweist sich 
der HPX-84 gerade aufgrund seines 
niedrigen Preises als ein ausgezeich¬ 
netes Werkzeug - die Nachteile in der 
Geschwindigkeit werden durch die 
vergleichsweise hohe Präzision 
wettgemacht. 

Die Daten: 

- DIN-A 3 Flachbettplotter 

- Arbeitsbereich 400x290 mm 

- Z8Ö-CPU 

- acht-Bit Centronics-Schnittstelle 

- Papierhalterung per Magnetstreifen 

- Wiederholgenauigkeit 0,1 mm 
-verschiedene Stifthalter lieferbar 

- Preise: 

Auflösung 0,1 mm, 120 mm/sec.: 
Bausatz ca. 1198,- DM 
Auflösung 0,05 mm, 70 mm/sec.: 
Bausatz ca. 1298,- DM 
Auflösung 0,025 mm, 35 mm/sec.: 
Bausatz ca. 1398 - DM 
Die Preise der Fertiggeräte liegen je¬ 
weils 100,- DM über denen der 
Bausätze. 

Vertrieb: Peter Habersetzer 

8121 Polling (ME) 



QO 

FGÖ® Km @D!MTS Km 


Aber für gute Programme und Tips & Tricks umso mehr! 


Für den 
Programmhit 
des Monats 

1 . 000 ,— 


Und für den 
Top-Tip 
des Monats 

500,— 



Das sind doch gute Argumente, Ihr Programm auch 
einmal zum Hit des Monats werden zu lassen. 

Bitte richten Sie Ihre Einsendungen an: 

DMV Daten und Medien Verlagsgesellschaft mbh — Fuldaer Straße 6 — 3440 Eschwege 
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Tips & Tricks—i 


Printer-B 

Kurzanleitung 


für 464-664-6128 



Bei Printer-BASIC handelt es sich um eine RSX-Befehls- 
erweiterung für alle CPC’s in Verbindung mit dem DMP 
2000. Unter anderem steht eine Hardcopyroutine zur Ver¬ 
fügung; eine 8-Bit-Schnittstelle wie aus Heft 5/86 wird 
unterstützt. 

Die Programme: 

P-B ASIC (Heft und Databox) ist der Lader für die Maschi¬ 
nenroutine und stellt die verfügbaren Befehle am 
Bildschirm dar. Diese Maschinenroutine ist im Heft als 
Datagenerator vorhanden: die Databox enthält die 
fertige Binärdatei. 


m=l: doppelte Dichte, 960 Pkt./Zeile 

m=2: dopp. Dichte, dopp. Geschw., 960 Pkt./Zeile 

m=3: vierfache Dichte, 1920 Pkt./Zeile 

m=4: CRT-Grafik, 640 Pkt./Zeile 

m=5: Plottergrafik. 576 Pkt./Zeile 

m=6: CRT-Grafik, 720 Pkt./Zeile 

Wird m=7 gesetzt, so wird eine Betriebsart gesetzt, in der 
die Nutzung der selbstdefinierbaren Zeichen ermöglicht 
wird. 

|DEFCHAR,c,bl,b2...b8 

Mit diesem Befehl können 16 verschiedene Zeichen selbst 
definiert werden. Parameter c stellt die Nummer des Zei¬ 
chens dar (0 - 15). Die Werte bl - b8 definieren die Zei¬ 
chenmatrix. Zu beachten ist hierbei, daß Druckerzeichen 
nur sechs Punkte breit sind; bl - b8 dürfen somit nur im 
Bereich von 0 bis 63 liegen. Nach einem ]PMODE,7- 
Befehl können die vorher definierten Zeichen wie folgt 
ausgedruckt werden: 

|CHAR,n (n= 0 - 15 bzw. 16-31) 

oder 

ILPRINT, @ a$ ASC(a$)= 0-15 


Die Befehle: 


JCHAR,c 

Druckt das Zeichen mit dem ASCII-Code c im Gra¬ 
fikmodus des DMP aus; Quelle der Matrix (8x8) ist der 
Zeichensatz des Rechners, somit hat man auf einfache 
Weise 256 selbsldefinierbare Zeichen zur Verfügung. Fol¬ 
gende Zeile druckt den gesamten Zeichensatz des CPC’s 
aus: 

FOR n=0 TO 255:jCHAR,n:NEXT:PRINT#8 

Die Steuercodes 0-31 werden hier als Grafikzeichen ge¬ 
druckt; so ist z.B. über JCHAR.10 kein Zeilenvorschub zu 
erreichen. Dem |CHAR- und |LPRINT-Befehl sollte also 
immer ein PR1NT#8 folgen. 

ILPRINT, @a$ 

Druckt den Inhalt des Strings aS aus (siehe auch 
|CHAR) 

|PMODE,m[,b] 

Legt den Grafikmodus m, die Breite b und die Invertierung 
fest. Der |PMODE-Befehl gilt für alle Ausgaben mittels 
|CHARund |LPRINT sowie für den |SHAPE-Befehl. Bei 
letzterem Fall giltbjedoch nicht für ein einzelnes Zeichen, 
sondern für die Anzahl der Zeichen in einer Zeile. Stan¬ 
dardwert von b ist eins, ansonsten kann b folgende Werte 
annehmen: 

1. b= 1 - 15: 

Breite 1-15. Invertierung aus 

2. b= (1 - 15) +16: 

Breite 1-15, Invertierung an 

3. b= 0: Invertierung aus, 

Breite bleibt 

4. b= 16: 

Invertierung an, Breite bleibt 
Durch m wird einer der sieben zur Verfügung stehenden 
Grafikmodi des DMP angewählt. Mögliche Werte für m 
und deren Bedeutung: 
m=0: einfache Dichte, 480 Pkt./Zeile 


|SHAPE,l,@aS 

Dient zur Erzeugung großflächiger Muster und Symbole. 
Parameter 1 definiert den linken Rand, also die Zeichen¬ 
position, ab der der Druck beginnen soll. Am Ende des 
Ausdrucks wird das Papier wieder an die ursprüngliche 
Zeile zuriickgescrollt. Damit ist die Möglichkeit gegeben, 
mehrere Shapes in der gleichen Zeile unterzubringen. 
Ein Beispiel: 

J0 a £ := ’’******£p(-’** £ **£)jy/jp******’? 

20 inv%=16 

30 FOR n=ö TO 70 STEP 10 
40 PMODE,4,5,+inv% 

50 inv%=inv% XOR 16 
60 |SHAPE,n.@a$ 

70 N EXT 

Hierbei wählt jPMODE den Grafikmodus 4 mit 640 
Punkten/Zeile und die Breite 5 sowie die Invertierung. Die 
Breite gibt an, wieviele Zeichen aus dem String a$ in einer 
Zeile ausgegeben werden sollen. 

Die Höhe eines Shapes ergibt sich aus der Länge des 
Strings geteilt durch die Breite im |PMODE-Befehl.Zu be¬ 
achten ist, daß die Stringlänge immer ein Vielfaches der 
Breite sein muß. Weiterhin bleibt die Definition des linken 
Randes nach Beendigung des |SHAPE-Befehls erhalten, 
so daß man diesen vordem normalen Drucken wiederein¬ 
stellen muß. 

|SPOOL,n,mem 

Dieser Befehl aktiviert einen Druckerspooler mit einem n 
kByte großen Puffer ab Adresse mem. Der DMP 2000 ver¬ 
fügt zwar intern über einen 2kB großen RAM-Puffer. trotz¬ 
dem wird der Rechner bei einem Ausdruck eines längeren 
Programms lange blockiert. |SPOOL erlaubt die Einrich¬ 
tung eines maximal 32kB großen Puffers, aus dem die Da¬ 
ten direkt an den Drucker übergeben werden; der Rechner 
kann während des Ausdrucks schon wieder benutzt wer¬ 
den. Folgendes Beispiel richtet einen 16kB großen 
Puffer ein: 

- MEMORY HIMEM - 16384 

- |SPOOL,16,HIMEMT 1 
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|SPOOL,0 

Beendet den Spoölvorgang, sobald sich kein Byte mehr im 
Pufferspeicher befindet 

ISPOOL 

Beendet den Spoolvorgang sofort 

ITEXTCOPY 

Gibt eine Kopie aller Textzeichen vom Bildschirm auf den 
Drucker aus. Grafik kann nicht abgebildet werden, eben¬ 
sowenig Zeichen, die durch Grafik verunstaltet wurden 
oder nicht in der aktuellen PEN-Farbe dargestellt sind. 


190 MODE 1 
200 LOCATE 

:BORDER 2 

2,2 


[14343 

[6343 

210 PRINT CHR$(24)" Printer BASIC 
45 Bytes free "CHR$<24> 

220 PRINT 

- 408 

[36943 

[3613 

230 PRINT" 
OPY” 

!CHAR,code 

!TEXTC 

[10743 

240 PRINT" 
OPY, inv** 

! LPRINT, <5a$ 

!HARDC 

C16393 

250 PRINT" 
ON" 

!PMODE,mode!,inv/br3 

:prot. 

[21463 

260 PRINT" 
OFF" 

!DEFCHAR,num,bl,b2. . . b8 

:PROT. 

[26513 

270 PRINT" 

ISHAPE,left.Sa* 

:BIT7" 

[10473 

280 PRINT" ! SPOOL [, ItB, HIMEM+13 

290 PRINT:NEW 

!BIT8" 

[15583 

[8333 


[HARDCOPY,inv 

Erzeugt eine Hardcopy des Bildschirms unabhängig vom 
Modus mit einer Auflösung von 960 Pkt./Zeile. Der Inhalt 
von inv bestimmt, ob die Hardcopy invers (inv=l) oder 
normal (inv=0) ausgedruckt werden soll. Das Format des 
Ausdrucks entspricht etwa DIN A5 quer. 





IPROT.ON und |PROT.OFF 

Sämtliche Textausgaben können hiermit auf dem 
Drucker protokolliert werden. z.B. 

| PROT.ON :CAT: |PROT.OFF 

druckt parallel zur Bildschirmausgabe das Directory oder 
alle folgenden Kassettenmeldungen. 


|BIT7 und |BIT8 

In Zusammenarbeit mit der 8-Bit-Schnittstelle aus Heft 5/ 
86 erlauben diese Befehle die Umschaltung zwischen dem 
Original-Druckerport der CPC’s und einem vollwertigen 
8-Bit-Centronicsport. 

Dies macht sich hauptsächlich bei der Arbeit mit |CHAR, 
|LPRINTund jSHAPE bemerkbar, da die durch diese Be¬ 
fehle erzeugten Zeichen bei Verwendung von nur sieben 
Bits eine komplette Punktreihe entbehren müssen. 

(T. Fippl) 

Listing 1: Das Ladeprogramm 


100 DEFINT a-z:pc=$A100 C1181] 

110 SYMBOL AFTER 256 [14083 

120 MEMORY pc-1 [317] 

130 LOAD"!pbcade",pc C881] 

140 FOR m=&30 TO &37 t11283 

150 READ b$:b=VAL<"&"+b$> [10523 

160 POKE in, b: NEXT [2793 

170 DATA 61,0(1,73,10,31,03,0,31 [12773 

180 CALL pc+7 [2723 


Listing 2: Datalader des Hauptprogramms 


10 

20 

30 

40 

50 

60 

70 

80 

90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

201 

202 

203 

204 

205 

206 

207 

208 

209 

210 
211 
212 

213 

214 

215 

216 

217 

218 

219 

220 
221 
222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 


'* * 

'* Printer BASIC * 

'■* (o) 1986 by 

Thomas Fippl * 

'* * 

'* * 

DEFINT a-z:pc=&A100:MEMORY pc-1 
FOR z=200 TO 361:sum=0 
PRINT CHR$ <13)"Zeile:"z; 

FOR pc=pc TO pc+7 

READ byteS; b=VAL<"8t'’+byte$) 

sum=(sum XOR b)+b 

POKE pc,b:NEXT:READ ch 

IF chOsum TKEN PRI NT" <Error>" : END 

NEXT:SAVE"PBCODE",b, &A100, &510 

DATA f5,7e,23,66,6f,f1,e9,21,1420 
DATA 12,al,01,16,al,c3,dl,bc,1250 
DATA 00,00,00,00,00,00,3c,al,378 
DATA c3, 84, al,f7,df,al,c3,25,1486 
DATA a2,c3,8e.a2,f7,b5,a2,f7,1824 
DATA lf, a3, f7,62,n3,c3, 4b,a4,1936 
DATA c3,55,a4,c3,79,a4,c3,82,2070 
DATA a5,c3,a3,a5,43,48,41,d2,1016 
DATA 4c,50,52,49,4e,d4,50, 4d, 1056 
DATA 4f,44,c5,44,45,46,43,48,1340 
DATA 41,d2,53,48,41,50,c5,54,480 
DATA 45,58,54,43,4f,50,d9,48,1068 
DATA 41,52,44,43,4f,50,d9,42,1224 
DATA 49,54, b7, 42,49,54, b8,53,772 
DATA 50,4f,4f,cc,50,52,4f,54,522 
DATA 2e,4f,ce,50,52,4f,54,2e,568 
DATA 4f,46,c6,00,3d,c0,3a,61,982 
DATA a2,fe,07,7b,28,3d,d0,cd,1404 
DATA bc,al,11,5f,a2,01,08,05,726 
DATA cd,bl,a3,cd,b0,al,5f,3a,1204 
DATA 64,a2,47,3a,65,a2,ab,cd.920 
DATA fa, al, 10, f7,0d, 20, ec, c9, 1052 
DATA 21,df,al,3e,80,2b,cb,26,1110 
DATA lf, 30, fa, c9, cd, a5, bb, d4, 1250 
DATA 06,b9,11,d7,al,01,08,00,882 
DATA ed,b0,c9,e6,0f,06,00,4f,1152 
DATA 21,7e,a2,09,7e,18,23,00,374 
DATA 00.00,00,00,00,00,00,3d,122 
DATA c0,eb,b6.c8,47,23,7e,23,1424 
DATA 66,6f,c5,e5,e7,5f,cd,86,1900 
DATA al,cd,04.a2,el,cl,23,10,1482 
DATA fl,c9,c5,4f,cd,2b,bd,79.1256 
DATA 30,fa,c1,c9,cd,09,bb,d0,1594 
DATA fe,fc,c0,21,le,a2,06,07,512 
DATA 7e,cd,5a,bb,23,10,f9,ed,866 
DATA 7b,10,al,c3,8f,a3,42,52,614 
DATA 45,41,4b, 0d, 0a, 3dT, 20,05,532 
DATA 7b,le,01,18,05,3d,c0,dd,878 
DATA 7e, 02,32,61,a2,fe,07,28,984 
DATA ld, d0, 7b.e6,0f,28,0d,32,1092 
DATA 64,a2,6f,af,67,4f,29,29,976 
DATA 29,22,62,a2,cb,63,28,01,940 
DATA 2f,32,65,a2,18,02,0e,01,678 
DATA 11,66,a2,06,07,18,53,lb,372 
DATA 2a,04,08,00,01,00,lb,25,226 
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245 DATA 80, 

246 DATA 80, 

247 DATA 00, 

248 DATA 03, 

249 DATA 19, 

250 DATA c0, 

251 DATA df, 

252 DATA 13, 

253 DATA 21. 

254 DATA 06, 

255 DATA fd, 

256 DATA 06, 

257 DATA 4e, 

258 DATA a2, 

259 DATA a2, 

260 DATA 10, 

261 DATA cl, 

262 DATA 11, 

263 DATA fd, 

264 DATA e5, 

265 DATA al, 

266 DATA al, 

267 DATA 80, 

268 DATA 67, 

269 DATA 04, 

270 DATA b9, 

271 DATA a3, 

272 DATA f3, 

273 DATA bd, 

274 DATA 02, 

275 DATA a2, 

276 DATA 18, 

277 DATA 3f, 

278 DATA cd, 

279 DATA 79, 

280 DATA dd, 

281 DATA 11, 

282 DATA 46, 

283 DATA 06, 

284 DATA dl, 

285 DATA 7a, 

286 DATA 02, 

287 DATA b0, 

288 DATA c9, 

289 DATA a3, 

290 DATA 11. 

291 DATA la. 

292 DATA 04, 

293 DATA 13, 

294 DATA 38, 

295 DATA a3, 

296 DATA e5, 

297 DATA 21, 

298 DATA cd, 

299 DATA el, 

300 DATA a4, 

301 DATA 10, 

302 DATA d6, 

303 DATA ed, 

304 DATA 11, 

305 DATA 00, 

306 DATA a4, 

307 DATA 21, 

308 DATA 79, 

309 DATA fl, 

310 DATA 11, 

311 DATA a5, 

312 DATA dd, 

313 DATA 87., 

314 DATA 39, 

315 DATA 01, 

316 DATA a5, 

317 DATA b6, 

318 DATA fl, 

319 DATA cd, 

320 DATA 01, 

321 DATA c9, 

322 DATA 06, 

323 DATA 3d, 

324 DATA 3d, 

325 DATA a5, 

326 DATA 39, 

327 DATA ed, 

328 DATA c3, 

329 DATA b2, 

330 DATA 3a. 


00,lb,49,80, 
80,0b,ff,00, 
ff,00,ff,00, 
04,05,06,10, 

la, 1c,ld,le, 
dd, 7e,10,e6, 
al, dd,e5,dl, 
13,2b,87,87, 
7e,a2,09,4e, 
11,c3,bl,a3, 
6f,eb,b6,c8, 
06, dd,4e,02, 
23,7e,23,66, 
06,05,cd,bl, 
47,c5,e7,23, 
f9, cd, ac, a3, 

fd, 2c,79,90, 
1c,a3,06,03, 
2d,20,f4,c3, 
cd,bc,al,06, 
5f,3a,65,a2, 
10,f3,el,cl, 

lb, 33,14,lb, 
6f,cd,11,bc, 
28,01,87,87, 
cd, d0,bd,e5, 
dl, el,2c,7d, 
c3 , cd, bd, e5, 

fe, 20,38,04, 
3e,20,cd,bb, 
dl, el,24,7c, 
4a,3d,c0,7b, 
dd,6f,11,3e, 
bl,a3,21,8e, 
3d,20,®6,dd, 
6f,cd,94,a3, 
fa, ff ,'l9,0d, 
a4 , 18,lb,11, 
05,11,41,a4, 
06,50,cd,cl, 
3d,28,eb,11, 

la, fe.80,38, 
al,cd,fa,al, 
c5,e5,06,03, 
dl, 2b,2b,10, 
db.al.06, 04, 
a9,e6,3f,12, 
cd,bl,a3,dl, 
13,c9,cd,11, 
0d,0f,28,07, 
cd,ff,a3,cd, 
d5,f5,cd,f0, 
d0, a5,06,00, 

lb, a4,47,dl, 
cl,c9,47,4f, 

la, 87,87,b6, 
f7,21,48,a4, 
04,20.04,11, 
53,49,a4,79, 

lb, 2a,04,40, 
d7,al,c0,0e, 
b6,20,09,c9, 
75, a4, b6, c0, 
32,lb,a3,32, 
bd,3a,3b,a5, 
00,a5,18,40, 
28,3d,3d,28, 
b6,02,28,46, 
87,3d,32,38, 
a5,21,2f,a5, 

ff, 81,cd,e0, 
06,07,af,77, 
c0,2f,77,c4, 
bd,11,00,35, 
06,b9,21,2f, 
21,3b,a5,7e, 
b3, c0,2f, 32, 
f5,ed,78,17, 
a5,7c,b5,28, 
a5,2a,3f,a5, 
a4,67,22,3f, 
a5,19,f3,d9, 
79, d9,7e, d9, 
0a,a5,3a,3c, 
c9,f3,47,e5, 
38, a5,bc,38, 


lb,26,00,494 
ff,00,ff,1512 
ff,01,02,1028 
15,16,17,24 
lf,d6,09,246 
0f,4f,21,844 
06,08,la,966 

77.10, f7,622 
11,6d,a2,640 
d6,02,c0,956 
11, 16,a3,1470 
cd,bl,a3,1328 
6f,11,5f,638 
a3,3a,64,1188 
cd,ff,a2,1316 
cd,04,a2,848 
4f,20,de,1020 
cd,bl,a3,1084 
8f,a3,c5,1988 
08,cd,b0,1320 

ab, cd,fa,1070 
c9,lb,6c,1388 
6a,14,c0,550 
3e,14,38,920 
57,cd,06,886 
d5,cd,44,2084 
fe, 19,38, 1266 
d5,cd,d6,1458 

fe, 7e,38,1338 
a5,cd,04,528 

ba, 38,e4,1484 
3d,2f,e6,1040 
a4,06,03,742 
01,0e,43,836 
7d,e6,3c.928 
cd,04,a2,1834 
20,e9,11,900 
00,00,d5,662 
cd,bl,a3,680 
a3,10,fb,1630 
23.a2.06,1116 
04,79,c4,710 
13, 10,fl,1766 
d5,cd,eb,1642 
f7.el.d5, 1322 
dd,4d,lb,1092 

10, f8,06,768 
cl,13,13,1094 
bc, 3e,04,982 
3d,cd,ff,856 

ff, a3,c5,1948 

bb, 87,87,1566 
4f,09,fl,850 

13.10, fd,948 
ed,5b,49,512 
23,12,13,1288 
79,86,77,1180 
d7,al,77,508 
c9,lb,33,874 
01,lb,32,424 
14,21,75,656 
c0,0e,17,778 
2f,77,23,534 
le,a3,11,790 
a7,28,03,824 
00,c3,43,596 
4b,3d,C0,786 
fe, 21,d0,1156 
a5,ed,53,936 

11, d0,a4,844 

bc, 21,42,1210 
2b,10,fc,1130 

ac, a3,21,1476 
c3,97,a5,1490 
a5,cd,83,1170 
a7,20,e2,838 
3c,a5,c9,830 
17,d8,2a,884 
25,2b,22,1102 
23,3a,38,942 
a5,ed,5b,1596 
79,f6,0c,1072 
ed,49,d9,1918 
a5,a7,20,992 
2a,3d,a5,1264 
15,23,22,366 
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331 DATA 3d,a5,2a,41,a5,23,a4,67,956 

332 DATA 22,41,a5,d5,ed,5b,39,a5,1350 

333 DATA 19,70,dl,el,3f,fb,c9,00,1200 

334 DATA 00,00,00,00,00,00,00,00,0 

335 DATA 00,00,00,00,00,00,00,00,0 

336 DATA 00,00,00i01,32,00,c5,06,368 

337 DATA f5,4f,ed,78,87,87,79,cl,1016 

338 DATA 30,07,10,f2,0d,20,ef,a7,720 

339 DATA c9,cb,7f,20,05,01,20,f6,1222 

340 DATA ed,49,06,ef,4f,e6,7f,ed,1484 

341 DATA 79,f6,80,f3,ed,79,e6,7f,816 

342 DATA ed,79,79,01, 00 ,f6,fb,ed,1292 

343 DATA 49,37,c9,00,c3,af,a5,c3,646 

344 DATA b4,a5,c0,cd,c3,a5,af,21,1956 

345 DATA 7b,a5,b6,c0,2f,77,23,11,844 

346 DATA d3,bd,cd,97,n5,le,d9,06,1180 

347 DATA 03,la,4e,77,79,12,23,13,530 

348 DATA 10,f7,c9,c0,cd,c4,a5,af,514 

349 DATA 21,7b,a5,b6,c8,18,dd,cd,786 

350 DATA bb, a5, 18, c 8 , fe, 20, de, bb, 1290 

351 DATA a5, 18, c4,5f, cd,f1,bd,7b,1516 

352 DATA 30,fa,c9,3c,11,cd,a5,06,1136 

353 DATA 03,4f,c3,bl,a3,lb,69,80,1370 

354 DATA 00,00,00,00,03,03,03,03,16 

355 DATA 01,01,01,01,01,02,01,02.16 

356 DATA 00,03,03,03,03,02,01,03,24 

357 DATA 03,01,01,03,01,03,01,03.20 

358 DATA 01,01,02,02,03,00,00,03,20 

359 DATA 03,00,03,00,00,02,03,00,18 

360 DATA 00,03,00,01,02,02,00,02,20 

361 DATA 00,02,01,00,02,00,01,00,8 


Pattern FILL 
fur4«4 


In der CPC Ausgabe Nr.4 wurde im Rahmen der Serie 
„Der gläserne CPC” eine komfortable und superschnelle 
FILL-Routine vorgestellt. Durch den Begleitartikel und 
verschiedene Grafiken angeregt, stellte sich mir nun das 
Problem, den vorgebenen FILL-Algorythmus auf ein 
PATTERN FILL zu erweitern. Außerdem sollte es mög¬ 
lich sein, die Pattern auch durch die BASIC Grafik- 
Befehle erzeugen zu können, d.h., ein DRAW über den 
Bildschirm soll nur die Punkte der Pattern erscheinen las¬ 
sen. Nach langem Überlegen kam der zündende Gedanke. 
(Um Schwierigkeiten zu vermeiden, bezog ich mich nur 
auf die Darstellung in Mode 1.) 

Anstatt eine ganz neue Assembler-Routine zu schreiben, 
die auch die Ausgabe auf dem Schirm übernimmt, verbog 
ich die zindirection SCR WRITE (&BDE8). Diese Routine 
erwartet als Einsprungbedingung im HL-Register die 
Screenadresse, daß B-Register enthält die Farbmaske und 
das C-Register die Bitmaske. Diese Werte werden von den 
PLOT- und DRAW-Routinen sowie der FILL-Routine 
übergeben. Allerdings wurde bei FILL das B-Register an¬ 
derweitig genutzt. 

Bevor nun die Bildschirmausgabe erfolgt, ändere ich die 
Farbmaske in B den Pattern entsprechend, die anderen 
Werte bleiben natürlich unverändert. Danach springe ich 
mit Hilfe eines RST 18 zu den ursprünglichen Ausgabe- 
Routinen im Betriebssystem. 

Die Farbmatrix 

Soweit, so gut. Doch wie teile ich der Hilfsroutine das 
Muster mit den entsprechenden Farbmasken mit? 

Zuerst einmal erstelle ich eine 16 Bytes lange, der Zeichen¬ 
matrix auf dem Screen entsprechende Farbmatrix (ein 


Zeichen belegt auf dem Screen in Mode 1 ja 16 Bytes). In 
dieser stehen später die Farbmasken, die gegen die gelie¬ 
ferten Masken in B ausgetauscht werden. Aus der in HL 
übergebenen Screenadresse wird die nötige Farbmaske er¬ 
mittelt. DE fungiert dabei in unserer Matrix als Pointer 
und wird zu Beginn auf die erste Farbmatrix gesetzt, dann 
erfolgt eine BIT-Abfrage. 

Soweit arbeitet die Pattern-Routine, nachdem der 
Sprungvektor bei Adresse &BDE8 auf unsere Hilfsroutine 
verbogen wurde. 

Erstellung der Farbmatrix 

Andere Muster würden nun ein umständliches POKEn in 
unsere Farbmatrix erfordern. Doch auch hier soll ein klei¬ 
nes Assembler-Programm abhelfen. 

Durch Angabe des Characters, des Hintergrundes und der 
Schreibfarbe, soll die Matrix erstellt werden. Die Routine 
TXT GET MATRIX (&BBA5) übergibt uns in HL die An¬ 
fangsadresse des in A übergebenen Zeichens. 

Um umständliche Restarts zu vermeiden, wird ein Symbol 
after 32 vorausgesetzt. Liegt nun die Matrix dennoch im 
unteren ROM, folgt ein RETURN. 

Mittels SCR REPACK (&B053) wird die Zeichenmatrix 
dem MODE entsprechend in unsere Farbmatrix entpackt. 
Dazu enthält DE die Adresse unserer Farbmatrix. 
Anstatt der gewünschten Farbmasken stehen nun leider 
die Bitmasken in der Matrix. Durch einiges Bitgeschiebe 
ändert sich dies. Dazu wurden die Assembler-Sequenzen 
aus dem Begleitartikel in CPC Heft Nr.4 benutzt. Sobald 
alle Bytes richtig „eingefärbt” sind, wird rcturned. 

Das Pattern FILL 

Für ein Pattern FILL muß die FILL-Routine aus Heft 4 
wie folgt geändert werden: 

Die Zeilen 830 - 870 werden durch ein CALL &A000 er¬ 
setzt. Dadurch verringert sich die Arbeitsgeschwindigkeit 
des FILLs unwesentlich. Bei der Benutzung des FILLs 
muß nun darauf geachtet werden, daß weder die PEN- 
noch die PAPER-Farbe der Pattern, der Farbe der Füllflä¬ 
che entsprechen, da sonst die Routine in eine End¬ 
losschleife geraten würde. 

Wird die normale Grafikausgabe gewünscht, müssen nur 
die alten Werte der Indirection SCR WRITE wieder einge¬ 
setzt werde, oder PEN- und PAPER-Farbe der Pattern- 
Routine werden auf &00 (Farbe 0) gesetzt. Wie die Routi¬ 
nen nun speziell gebraucht werden, ist dem Demo- 
Programm zu entnehmen. 

(P. Stein) 


100 ' BASCIC-Lader zum Pattern-Fill [1199] 

110 -- [14163 

120 ' [1173 

130 FOR adr=&A200 TO &A2DE [10483 

140 READ p:POKE adr,p [6513 

150 NEXT [3503 

160 SAVE "pfi11" , b,&A200,&DE [19983 

170 END [1103 


180 DATA &DF, &4, &A2, &C9, &7, &A2, &FE, &7B, SiC [13483 
D, &F6 

190 DATA &17, &F5,8iCD, &FC, &15, &CD, &27, Sil8 , [17933 
&CD,&86 

200 DATA &C, &C1, &B8, &C8, 5j32, &DB, 8»A2, &CD, & [29813 
1A,&16 

210 DATA &CD,&FF,Ä16 f ftD2,ft91,*A2 1 &E5,*FD, [16823 
SEI,&D5 

220 DATA &DD, &E1,&CD,&A9,&B,Ä3A,&DB,&A2,& [20013 
47,8rFD 

230 DATA &23, &CD, &2D, &C, &3A, &34 , &B3,8iFD, & [18463 
95,&38 

240 DATA &5, &78, &AE,&A1,&28,&EF,&FD,Ä2B,& C15013 
CD,*13 
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250 DATA 
, 4C 

260 DATA 
28, &7 
270 DATA 
&E1,&E5 
280 DATA 

E, &A1 
290 DATA 

F. &Al 
300 DATA 
3A.&36 
310 DATA 
13, &C 
320 DATA 
8r7D,&B4 
330 DATA 
&G3,&1E 
340 DATA 
&1, &3 
350 DATA 
89,&AE 
360 DATA 
&2B,&73 
370 DATA 
&A2,&D1 
380 DATA 
&56,&2B 
390 DATA 
C9,ä0 
400 DATA 


8tC, &51, &59, &E5, &C5, &CB, &1, &DC, &5 
&78, &42, &AE, &A1,8s57, &20, &A, &B0, & 
&DD, &2B,SDF,&A1,&A2,&DD,&23,&C1, 
&C5, &CB, &9, &DC, &F9, &B, &78, &43 , StA 
&5F, &20, &A, &B0,&28,&7,8tDD, &23, SD 
&A2,SDD,S2B,SCI,SEI,SCD,S0,SA0,S 
SB3,SFD,S95,S30,SA, SFD,S2B,SCD,S 
&78, SAE, SA1, S28, SB8, S2A, SDC, SA2, 
&C8,S2B,S22,SDC,SA2, SDF,SC9,SA2, 
SA2, SA4, SA2, SFD, SD5, S2A, S89, SAE, 
S0, SCD, S18, SF6, S38, S17, SEB, S22, S 
SDD,SE5,SD1,SFD,SE5,SCI,S2B,S72, 
S2B, S71,S2A,SDC,SA2,S23,S22,SDC, 
SC9, SCC, SA2,SFD, S2A, S59,SAE,SEE, 
S5S,S2B,S22,S89,SAE,S6E,S26,S0,S 
S0, S0, S0, S0, S0 , S0, S0, S0 , S0, S0 


C2293] 

[14253 

[16563 

[23193 

[ 12913 

[29013 

[15813 

[26163 

[22993 

[25793 

[11923 

[21803 

[17873 

[18363 

[10173 

[13103 


100 ' BASIC-Lader zur Pattern-Routine 

110 ' - 

120 ' 

130 FOR adr=SA000 TO SA06D 
140 READ prPOKE adr.p 
150 NEXT 

160 SAVE "pattern",b,SA000,S6D 
170 END 

180 DATA SDF,S4,SA0,SC9,S7,SA0,SFE,SD5,SF 
5, SE5 

190 DATA SC5, Sil,S5A,SA0,SCB,S45,S28,Sl,S 
13,SCB 

200 DATA S5C, S28, S2, S13, S13, SCB, S64, S28, S 
4, S13 

210 DATA &13, S13,S13,SCB,S6C,S28,S8, S13,S 
13,S13 

220 DATA S13,S13,S13,S13,S13,S1A,S47,SCD, 
S68,SC 

230 DATA SCI,SEI,SF1,SD1,SC9,S3A,S6A,SA0, 
SCD, SA5 

240 DATA SBB,SD0,Sil,S5A,SA0,SCD,S53,SBC, 

S21 .S5A „ a. in. * 

250 DATA SA0, S6,S10,S7E,S4F,S3A,S6B,SA0,S 

77,S3A 

260 DATA S6C,SA0,SAE,SA1,SAE,S77,S23,S10, 
SF0,SC9 

270 DATA SF, S1F,S9F,SDF,S9F,S7F,S8F,S7F,S 
9F,S7F’ 

280 DATA S9F, SFF, SF,SFF, SFF,SFF,S46,SFF,S 
F, S0 


100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 


' ******************************* 

' * Pattern-DRAV / Pattern-Fill * 

' * * 

' * von * 

' * Peter Stein * 

' * * 

' * Juli 1986 * 

' ******************************* 

' Zeichen-RAM muss verschoben werden 

SYMBOL AFTER 256 
MEMORY S9FFF 
LOAD "pattern" 

LOAD ”pfi11" 

' SYMBOL AFTER wird vorrausgesetzt 
SYMBOL AFTER 32 


m n Michael Naujoks 


CPC 

Kassette / Diskette 

Joyce 

Diskette 

Aller Shock 

34,90 

/ 49,90 

30 Clock Chess 

49,- 

Impossible Mission 

33.90 

/ 49,90 

Alter Shock 

59.— 

Jack Ihe Nippet 

33- 

1 49,90 

Bat Man 

49.- 

Jonny ReP II 

33.90 

/ 44.90 

Cyrus Chess 

49.90 

Mission Elevator 

39- 

/ 57,90 

Fairlight 

49.- 

Pro Tennis 

36,- 

1 49,90 

Hilch Hiker's Guide 

89,- 

Sai Combal 

33,- 

/ 49,— 

Lord of the Rings 

89,— 

Samantha Ta* Skip Poker 

33,- 

1 49,— 

Tomahawk 

69,— 

Space Shuttle 

34,90 

1 49,90 

SAS Raid 

49,- 

Tomahawk 

39,- 

/ 49,— 

Adisssverwaltjng 

129- 

Tujad 


49,90 

Vereinsverwaltung 

249,- 

Winter Games 

39,- 

1 49,— 

Oxford Pascal 

89,- 



Software 




[25213 

[14953 

[117] 

[13163 

[6513 

[3503 

[23243 

[1103 

[18443 

[23803 

[12043 

[15093 

[13743 

[19873 

[19163 

[16773 

[26113 

[15003 

[19123 


[12233 

[10773 

C1753 

[2693 

[5403 

[1753 

[6633 

[12233 

(1173 

[22253 

[1173 

[14083 

[ 134] 

(13613 

[16863 

[1173 

[22193 

[1173 

C12963 

[117] 


dk’tronics Speichererweiterungen 


(Casselte 464/664) 
(ROM 464/664) 
(ROM 6128) 


(Cassel!“ 46^ 664) 
(ROM 464/664) 
(ROM 6128) 


DM 89,— 

64K lüf 464/664 

DM129 ,- 

DM 129,— 

256K für 464/664 

DM 298,— 

DM 139,— 

256K für 6128 

*DM 298,— 

n.) 

dk’tronics Silicon-Disc 


DM 59.— 

64K für 6128 

*DM 98- 

DM 89,- 

256K für 464/664 

DM 298,- 

*DM 89,- 

256K für 6128 

*DM 298,- 


Adapter für Geräte mit *: DM 29,— 


Alle Gerate haben einen duchgeführlen Systembus und Können hmtortnander au! den [wateiungspoi! gesjeckt 
werden Für die mH • gekennzeichneten Gerate benötigen Sie deshalb auch nur einen Adapter “ 

Schneide: aut AmstraO-Anschluß Aut alle Gerate 6 Monate Vcillgaranhe Häroltwamiagen erwünscht. 

Kostenlosen Katalog Bll /86 anfordern! 


r 

Entwicklung & Vertrieb von 

Hotline: 

N 


Computer Soft- und Hardware 
Rottmannstr 40, 6900 Heidelberg 

(06221)46885 

/ 

\ 




Universeller EPROM-Programmer 4003 
für Schneider CPC 464 / 664 / 6128 

■ Programmiorl die gängigen EPROM- und EEPROM-Typen 
( z B ; 2716, 27C16, 2732, 2732A, 27C32, 2758, 2764, 
2764A 27C64 27128. 2/128A, 27C128, 27256, 27C256. 
•JA *" 2508. 2532, 2564, X2804A, X2816A, X2864A J ■ Voll 

_ menügesleuerle Soflwirt aut Kesselt« oder Diskette 

■ 32 KByle Irai für EPROM-Deten ( Brennen das 27256 
’ ohne Nachladen ) » Kam UmscheUe« Stecken odtr Löten 
nötig * Progrtmmierspennung wird im Qeril erzeugt • Ver¬ 
bindung zum CPC über Flechbendksbei und Interface-Kerl« mit 
durchfeführlam Eepensionsporl • Role und grüne Leucbtdiode zur 
Betriebs-Art-Anzeige ■ Komplett mil 28 poligem Testool-Sockel ■ 

■ Fertiggeret Für CPC 464/664 DU 289,50 ■ Beusetz für CPC 464/664 DU 239,- * 

■ Farliggeräl (ür CPC 6128 DU 319,50 ■ Beusilz tür CPC 6128 DM 269,- ■ 

■ Autoren für Software auf 3' Diskette . DM 15,- / eul 5.25* Diskette : DU 5,- ■ 

EPROM-Karte 2-64 KByte für alle CPC 

■ Wahlweise beslückbsr mit 2-64 KByte EPROM-Kepezi- 
tät ■ Arbeitet mit den EPROU-Typen 2716,-32,-64,-128 
» Durchgeführler Erweiterungsbus ( Floppy kompatibel ) 

* Auloslart von BASIC- und/oder Assembler-Program¬ 
men ■ Komplott mit umfengreieher und komfortabler 
Software euf K.ss.tle oder Diskette ■ Cleich.rmeBen 
lür Profis und Einsteiger geeignet ■ 

■ Ferliggerit für 464/664 DU 229,50 a Fertiggeret für 
6128 DM 249,50 # Beusetz mit Anleitung für 464/664 
DM 199,50 » Beusetz mit Anleitung für 6128 0M 219,50 

■ Aufpreis für Software euf 3* Diskette : DM 15,- / euf S.2S* Diskette : DM 5,- ■ 
« Fertiggerät ohne Software für CPC 464/664 : DU 99,- / für CPC 6128 : DM 119,- a 

preisgünstige Matrix-Drucker 

SPEEDY 100-80 100 Zeichen pro Sekunde a FXBO kompatibel a Neer Letter Quelity • 

■ Bis zu 142 Zeichen pro Zeile ■ Friktionsmlze und Treklorenlrieb ■ nur OM 739,- 

SPEEDY 130-80 .130 Zeichen pro Sekunde a Bis zu 132 Zeichen pro Zeile i 3*9 

B IBM kompatibel « Ideal für PC 1512 a deutsches und englisches Hendbuch B nur DM 839,- 
Citizen LSP-120D 120 Zeichen pro Sekunde a IBM und EPSON kompatibel a 9e9 Matr» 
a 4K Puffer serienmäßig a Schriften . Pica, Elite, invers, proportional, kursiv, komprimiert, 
doppelt breit, doppelt hoch ... B Neer Letter Quelily B 2 lehre G.rentie B nur DM 525,- 

DOBBERTin 

mOU/TRIE* ELE KTROfllK 

Brahmsstraße 9, 6835 Brühl, Tel: (06202) 71417 



Druckerkabel 


für CPC 464/664 
für CPC 6128 
für PC 1512 


DM 35.- 
DM 39,- 
DM 39,- 
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300 ' Sprungvektor verbiegen [ 850 ] 

310 ' [117] 

320 POKE &BDE8,&C3:POKE &BDE9,0;POKE &BDEA [1080] 

, &A0 

330 ' [1173 

340 MODE 1:INK 2,2 [1179] 

350 ' [1173 

360 ' **** Initialisierung **** [1090] 

370 ' [117] 

380 ' &a037=Einsprung fuer Farbmatrixerste C25893 

1 lung 

390 ' [117] 

400 ' &a200=Einsprung fuer Fill-Routine [1982] 

410 ' [117] 

420 ' &A06A=Zeichen-Code &A06B=Hintergrun [3785] 
dfarbe &A06C=Schreibfarbe 

430 ' [117] 

440 " &00=Farbe 0 &F0=Farbe 1 &0F=Farbe [1890] 

2 &FF=Farbe 3 

450 ' [1173 

460 POKE &A06B,&FF:POKE &A06C,&F:POKE &A06 [2532] 
A,70:CALL &A037 

470 ' [117] 

480 ' ***** DEMO **** [696] 

490 ' [117] 

500 PLOT 0,0:DRAV 640,400 [423] 

510 " C117] 

520 MOVE 600,20:CALL &A200,1 [1395] 

530 ' [117] 

540 POKE &A06A,79:CALL &A037 [1532] 

550 ' [117] 

560 MOVE 0,398:CALL &A200,1 [16623 

57 ® ' [1173 

580 POKE &A06C,0:POKE &A06A,147:CALL &A037 [16133 

590 FOR 1 = 100 TO 300 STEP 2 (1710] 

600 PLOT 100,i:DRAV 560,i [1033] 

610 NEXT [35 0] 

620 ' [1173 

630 POKE &A06B,0:CALL &A037 [1656] 

640 FOR i=50 TO 350 STEP 2 [13503 

650 PLOT 200,i:DRAV 460,i (12413 

660 NEXT [3503 

670 ' [117] 

680 POKE &A06A,164:POKE &A06C,&F0:CALL &A0 [17793 

37 

690 FOR 1=150 TO 250 STEP 2 [12563 

700 PLOT 250,1:DRAV 410,i [6553 

710 NEXT [350] 

720 ' [1173 

730 POKE &A06A,65;POKE &A06B,&F:CALL &A037 [27833 

740 MOVE 240,200;CALL &A200,1 [23813 

750 ' [117] 

760 POKE &A06B, Ss0 : POKE &A06C, &FF: CALL &A03 [22443 

7 

770 FOR i=0 TO 398 STEP 2 [8893 

780 PLOT 0,1: DRAV 638, i [15173 

790 NEXT [350] 

800 ' [117] 

810 GOTO 340 [4643 


ERAS.COM 



für CP/M 2.2 D 


Gerade beim Erstellen von Maschinenprogrammen fal¬ 
len allerhand Dateien an. Von Zeit zu Zeit muß dann die 
Diskette von überflüssigen Dateien „gesäubert" werden. 
Da hilft nur Dateiname für Dateiname mit Extend abtip¬ 
pen und löschen. 

Leichter geht das mit dem Programm "ERAS.COM”. Die 
Funktionsweise ist denkbar einfach. Nach dem Start folgt 
eine kurze Erklärung. Die Programme werden nacheinan¬ 
der angezeigt. Soll ein Programm gelöscht werden, muß 
die Taste T gedrückt werden (groß oder klein ist egal). Bei 
einer anderen Taste wird im Programm fortgefahren. 


Das Programm muß allerdings auf der zu säubernden 
Diskette vorhanden sein. 

(B. Hermann) 

10 DATA 3E,02,CD,0E,BC,21,11,04,01,20,03,A [2897] 
F,77,23,0B.B9,043E 

20 DATA 32,03,01,38,32,03,01,30,21,02,30,2 [2140] 
F,02,11,91,03.04E7 

30 DATA 0E,1A,CD,05,00,IE,00,0E,0E,CD,05,0 C33243 
0,11,11,04,21,024D 

40 DATA 8F,03,73,23,72,AF,21,88,03,77,3E,1 C14703 
0,F5,21,89,03,055C 

50 DATA 5E,23,56,EB,11.4C,01,D5,01,02,00,E [1946] 
9,21,8B,03,5E,04EE 

60 DATA 23,56, EB, 11,61,01, D5. E5, 21,88,03,4 [2819] 
E,06,00,34,El,05A6 

70 DATA E9,21,8D,03,5E,23,56,EB,11,6D,01,D [1927] 
5,E9,3E,02,CD,06A6 

80 DATA 0E,BC,CD,92,01,Fl.3D,C2,3C,01,11,B [3509] 
B,02,0E,09,CD,0609 

90 DATA 05,00,CD,5B,02,3E,02,CD,0E,BC,CD,E C3209] 
B,01,0E,00,C3,0590 

100 DATA 05,00,21,91,03,7E,FE,E5,CA,A9,01, [2767] 
21,9D,03,7E,B7,0685 

110 DATA C2,A9,01,21,92,03,CD,68,02,21,Bl, [2847] 
03,7E,FE,E5,CA,0759 

120 DATA C0,01,21,BD.03,7E,B7,C2,C0,01,21, (1858] 
B2,03,CD,68,02,0667 

130 DATA 21,Dl,03,7E,FE,E5,CA,D7,01,21,DD, [2916] 
03,7E, B7, C2,D7,08C7 

140 DATA 01,21, D2, 03,CD,68,02,21,Fl,03,7E, [3816] 
FE,E5,C8,21,FD,078A 

150 DATA 03,7E,B7,C0,21,F2,03,CD,68,02,C9, [3312] 
11,11,04,1A,B7,0605 

160 DATA C8,D5,0E,09,CD,05,00,11,9A,02,0E, C2396] 
09,CD,05,00,CD,04E9 

170 DATA 5B,02,CD,80,02,FE,4A,C2,10,02,Dl, C3025] 
D5,EB,CD,89,02,07B1 

180 DATA 11,5E,03,0E,09,CD,05,00,Dl,21,0C, [26593 
00, 19,EB,C3,EE,050E 

190 DATA 01,2A, 01,00,2B,2B,2B,EB,21,86,03, C25833 

73.23.72, C9,21,0434 

200 DATA 86,03,5E,23,56,21,IE,00, 19,E5,EB, (24003 
21,89,03,73,23,04CB 

210 DATA 72,El,23,23,23,E5,EB,21,8B,03,73, [23451 

23.72, El,11,06,063B 

220 DATA 00,19,E5,EB,21,8D,03,73,23.72,C9, [30243 
CD,09,BB,DA,5B, 0731 

230 DATA 02,CD,09,BB,D2,61,02,C9,E5,21,6F, [31743 
03,5E,23,56,El,06E1 

240 DATA 01,0B,00,ED,B0,3E,24, 12, 13,21,8F, C24983 
03,73,23,72,C9,04B4 

250 DATA FE, 61, D0,FE,AD,D0,D6,20,C9,11,62, (27303 
03,01,0B,00,ED,07E0 

260 DATA B0, 11,61,03,0E, 13, CD, 05,00, C9, 20, C25743 
20,20,20,20,20,03A1 

270 DATA 20,20,20,20,20,4C,6F,65,73,63,68, C27823 
65,6E,20,20,20,0431 

280 DATA 20,20,20,20,4A,2F,4E,20,20,20,24, C25153 
47,65,6C,6F,65,03B7 

290 DATA 73,63,68,74,20,77,69,72,64,20,6E, (29013 
75,72,20,64,75,05F6 

300 DATA 72,63,68,20,64,72,75,65,63,6B,65, (28661 

6E,20,64,65,72,0609 

310 DATA 20,54,61,73,74,65,20,20,20, 18,3E, (25903 

20,4A,2F,6A,20,03FA 

320 DATA 3C,18,20,20,20,0A,0D,0A,0D,42,65, [3289] 
69,20,61,6C,6C,034B 

330 DATA 65,6E,20,61,6E,64,65,72,65,6E,20, [3713] 
54,61,73,74,65,05F1 

340 DATA 6E,20,67,65,68,74,20,64,61,73,20, (24483 
50,72,6F,67,72,05B5 

350 DATA 61,6D,6D,20,7A,75,6D,20,6E,61,65, [34863 
63,68,73,74,65,0622 

360 DATA 6E,20,46,69,6C,65,2E,0A,0D,0A,0D, [3049] 
0A,0D,20,20,20,02E1 

370 DATA 20,20,20,20,20,20,20,20,20,20,20, [2136] 
20,20,20,20,20,0200 

380 DATA 20,20,20,20,18,20,54,41,53,54,45, [27863 
20,18,24,0A,0D,02AC 

390 DATA 24,01,00,00,00,00,00,00,00,00,00 ( [2691] 

00,00,00 ; 00,00,0025 

400 DATA 00,00,00,00,00,00,00,00,00,00,00, [1427] 

00,00,00,00,00,0000 
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410 DATA 00,00,00,00,00,00,00,00,00,00,00, C1427] 


00 , 00 , 00 , 00 , 00,0000 
420 ' 

430 OPENOUT"eras.com":znr=10 [1397] 

440 FOR x=l TO 41: sunune=0 [1151] 

450 FOR y=l TO 16 [1117] 

460 READ bytetß; byte=VAL(”&”+byte$> [1808] 

470 sunmie=s'uiimie+byte [754] 

480 PRINT#9,CHRSCbyte);:NEXT y [1504] 


490 READ pruefsumS:pruefsum=VAL(”&”+pruefs [2374] 
um$) 

500 IF pruefsum<>sunure THEN PRINT"Fehler i [4424] 
n Zeile ”;znr:END 

510 zeile=zeile + 10 : NBXT x [1210] 

520 CLOSEOUT [902] 



Indextabelle 
für 464-664-6128 


Das Programm „Indextabelle” demonstriert, wie 
Tabellenindices verteilt werden können, ohne daß sich 
eine der Spaltenkombinationen wiederholt. Es gibt 
Programmanwendungen, wo die Kenntnis solcher Indices 
wichtig ist. So kann zum Beispiel hei Modellrechnungen, 
die Polynome zur Grundlage haben, die KoelTizienten- 
matrix entsprechend indiziert werden. Durch Definition 
der Spalten als Einllußgrößen für einen technisch- 
wissenschaftlichen Versuch kann die Indextabelle als Ver¬ 
suchsplan verwendet werden. Die Ergebnisse lassen sich 
danach statistisch auswerten. 


Der Tabellenindex wird als Inhalt der Variablen zs in den 
Zeilen 220 und 230 errechnet. Dafür werden drei Varia¬ 
blen benötigt: 

z als Zeilenzähler 

folge als Spaltenfolge von gleichen Indices bis zum Wech¬ 
sel auf den nächsten Index 
intv als Intervall innerhalb einer Spalte 
Das jeweilige Spaltenintervall ist frei wählbar und dient 
als Grundlage zur ”folge”-Berechnung in den Zeilen 110 - 
150. Das Ganze ließe sich natürlich auch umgekehrt 
gestalten. 

Die in dem Beispielprogramm verwendeten Variablenna- 
men sind der Variablenliste zu entnehmen. Außer der Va¬ 
riablen wi, die als Flag benutzt wird, werden alle benötigt, 
um die Tabelle als Koordinatensystem zu definieren. Die 
Hauptvariable zs, die im Beispielprogramm als Platzhal¬ 
ter zum Auffüllen der Tabelle ausgegeben wird, muß beim 
Einbau in eigene Programme natürlich umdefiniert wer¬ 
den und problemorientierte Wertezuweisungen bekom¬ 
men. 


NAME 

ZEILE 

KOMMENTAR 

folge 

50 

Anzahl Indices bis zum Wechsel 

intv 

50 

Intervall innerhalb einer Spalte 

s 

70 

Spaltenzähler 

SS 

40 

max, Spaltenzahl 

wi 

170 

Drucker/Window Flag 

z 

190 

Zeilenzähler 

zs 

220 

Index (entspr. d. Koordinaten z.s) 

zz 

60 

max. Indexzahl 

(W.Bartel) 
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20 


Eingabe 


Tabellenformat- (39643 


30 CLS: VIJTDOV#!, 1,80,25,25 [14913 

40 PRINT#1,CHRS(7)"Vieviele Spalten ";:INP [41583 
UT#1, ”'*, ss: CLS#1 

50 DIM intv(ss), folge(ss) [9373 

J® f?“ 1 [5823 

70 FOR s=l TO ss [9533 

80 PRINT#1,CHR$(7)"Welches Intervall in Sp [53423 
alte "s” ?”;:INFUT#1,"" ; intv(s>:CLS#1 
90 zz=intv(s)*zz [21363 

100 NEXT s [3653 

110 '-folgen- [21573 

120 folge(ss)=1 [2543 

130 FOR s=ss-l TO 1 STEP -1 [14923 

140 folge(s)=folge(s+1>*intv(s+1> [10193 

150 NEXT s [3653 

160 '-Berechnung / Ausschrieb der Tab [20413 

eile- 


170 PRINT#wi, TAB(8)"z"TAB(20)" I N D E X T [45273 
A B E L L E" TAB(67)"(V, Bartel)" 

180 PRINT#wi, TAB07)STRINGS(72."-") [19973 

190 FOR z=l TO zz [8723 

200 PRINT#wi,TAB(7)z;TAB(15) ; [22713 

210 FOR s=l TO ss [9533 

220 zs=(INT((z-1)/folge(s))+1). MOD intvCs) [28323 
230 IF zs=0 THEN zs=intv(s) [16583 

240 PRINT#wi,zs" "; [11773 

250 NEXT s [3653 

260 PRINT#wi [7473 

270 IF z MOD 22 =0 THEN PRINT#1,CHES(7)"we [45873 
iter [ TASTE 3 ":CALL &BB06:CLS 
280 NEXT z [3543 

290 PRINT#wi,TAB(7)STRINGS(72,"-") C19973 

300 '-Ausgabe der Formatwerte- [36273 

310 PRINT#wi,TAB(7)”intv=”;TAB(13); [27253 

320 FOR s=l TO ss:FRINT#wi,USING "####";in [33113 
tv(s>,:NEXT s 

330 PRINT#wi,TAB(7)"folge=”;TAB(13); [33793 

340 FOR s=l TD ss:PRINT#wi, USING "####";fo [33503 
lge(s),:NEXT s 

350 PRINT#wi,TAB(7)STRINGS(72,"-"> (19973 

360 '-Druckerabfrage- C29543 

370 wi=0 [4453 

380 PRINT#1,CHRS(7)"Tabelle auf Drucker J [38413 
/ N ?":CALL äBB06:CLS #1 


390 IF INKEY(45> >—1 THEN wi=8:G0T0 170 ELS (50813 
E IF INKEY(46)>-l THEN ERASE intv,folge:GO 
TO 20 ELSE 380 



Multimode 

für 464 


Dieses Programm erlaubt es, ein Fenster zu definieren, in 
dem vier Farben und der Modus anders als auf dem Rest 
des Bildschirms sind. 


INK a,b,c a : 0..5 ; b,c : 0..26 

a ist die Nummer des Farbregisters. 
b ist die Farbe auf dem normalen Bildschirm, 
c ist die Farbe im Fenster. 

Wenn c fehlt, gilt b für den ganzen Bildschirm. 

Alle INK's können nicht mehr blinken. 

IADJUST,a,b a : 0..4 ; b : 0..1 

Der normale Wert für a ist 2. Die anderen Werte verschie¬ 
ben das Fenster um 1 - 2 Zeilen nach oben oder unten 
(eine Erhöhung schiebt das Fenster nach unten), 
b dient zur Feineinstellung. Bei b=l liegt das Fenster eine 
Pixelzeile weiteroben als bei b=Ö. 

IDELAY,a,b a,b : 0..255 

Der Befehl dient zur Beseitigung des Flackerns. Der Nor¬ 
malwert für a und b ist 0. 

Ein Erhöhung verschiebt die Flackergrenze nach rechts. 
Die Werte sollten nicht zu hoch gewählt werden. 

IOFF 

Der Befehl schaltet das Fenster aus. ADJUST und DE¬ 
LAY werden zurückgesetzt. Das Blinken der INK's ist wie¬ 
der möglich. 

Textausgabe: 

Um Texte ausgeben zu können, muß nur das getan wer¬ 
den, was sowieso sinnvoll ist, nämlich ein Window über 
das Fenster zu legen. 

Die Windows 4-7 funktionieren nur im Modus des Fen¬ 
sters. Das bezieht sich auf die Befehle PRINT, PAPER, 
PEN. WIN DOW,TAG, CLS, TAGOFF, INPUT, LINE 
INPUT, WINDOW. LOCATE. Die Windows 0-3 funktio¬ 
nieren nur auf dem Rest des Bildschirms richtig. 

Grafikausgabe: 

Wenn das durch die oben genannten Befehle zuletzt ange¬ 
wählte Window >3 war, ist die Grafikausgabe im 
Fenster eingeschaltet. 
z.B.: 

PEN 2 oder TAG #2 - NORMAL ; LOCATE #7,3,3, 
- FENSTER 

Die Routine besteht aus 472 Bytes M-Code. 

Wenn ein Interrupt unterdrückt wird, verschiebt sich das 
Fenster. Es kann von BASIC mit ION (ohne Parameter) 
und von Maschinensprache mit CALL &A068 zurückge¬ 
schoben werden. 

Bei Text- und Grafikausgabe ist es vorher oft notwendig, 
einmal PEN und PAPER bzw. GRAPEN zu setzen. Z.B. 
PEN 3 oder PEN #7.1 oder PLOT 4,4,1, 


Der Geschwindigkeitsverlust beträgt nur 1,4 %. 

Die Befehle: 

ION ’ a ’ b a,b : 1..6 

Der Belehl bestimmt die Grenzen des Fensters, 
a legt fest, wo das Fenster beginnt, 
b legt fest, wo das Fenster endet. 

’6’ bedeutet dabei ganz oben, 

’5’ liegt ca. sechs Zeilen darunter usw. 

MODE a,b a ,b . o..2 

a ist der Mode auf dem normalen Bildschirm, 
b ist der Mode im Fenster. 

Wenn b fehlt, gilt a auf dem ganzen Bildschirm. 


Die Routine verbiegt folgende Vektoren: 

SCR SET MODE (&BC0E) 

TXT STREAM SELECT (&BBB4) 

GRA WIN WIDTH (&BBCF) 

(A. Schröder/TM) 

Listing 1 

10 MEMORY &9FFF (1343 

20 FOR adr=&A000 TO &A1D7:READ a*:PQKE adr [22663 
f VAL{"l,"*a») : NEXT 

30 DATA 3A,92,Bl,FE,02,21,EE,Bl [15423 

40 DATA ED,5B,BF,Ai,28,0E,D6,04 [10543 

50 DATA C2,Bl,00,32,FD,Bl,ED,5B (9753 

60 DATA CI,Al,2E,DD,08,E6,FC,B3 (10073 

70 DATA 5F,08,CB,93,42,10,FE,01 C15013 

80 DATA 03.7F,ED,59,IE,40,ED,49 [18893 
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90 DATA 7E,B3,ED,79,2D,0D,F2,2E 
100 DATA A0,C3,Bl,00,B7,28,29,21 


110 

DATA 

B6,A0,3E, 

120 

DATA 

0F,BC,21, 

130 

DATA 

22,D0,BB, 

140 

DATA 

A0,22,B5, 

150 

DATA 

04,A0,DD, 

160 

DATA 

CD,19,BD, 

170 

DATA 

01,32,92, 

1B0 

DATA 

49,B9,C9, 

190 

DATA 

21,D4,Al, 

200 

DATA 

21,D0,Al, 

210 

DATA 

B3,01,04, 

220 

DATA 

A0,3A,BE, 

230 

DATA 

C9,21,CF, 

240 

DATA 

38,06,3E, 

250 

DATA 

77,2C,0F, 

260 

DATA 

C7,Al,Fl, 

270 

DATA 

4F,CD,55, 

280 

DATA 

03,CD,FB, 

290 

DATA 

11,00,00, 

300 

DATA 

Al,El,C9, 

310 

DATA 

CA,Al,El, 

320 

DATA 

AC,E6,04, 

330 

DATA 

C9,21,EB, 

340 

DATA 

04,00,ED, 

350 

DATA 

Al,3C,32, 

360 

DATA 

A1,32,C2, 

370 

DATA 

21,CA,Al, 

380 

DATA 

00,22,49, 

390 

DATA 

CI,Al,01, 

400 

DATA 

C3,85,A0, 

410 

DATA 

Al,C3,Dl, 

420 

DATA 

A0.C3.F1, 

430 

DATA 

75,Al,4F, 

440 

DATA 

44,4A,55, 

450 

DATA 

41,D9,00, 

460 

DATA 

D0,F3,01i 

470 

DATA 

C6, IC,ED, 

480 

DATA 

01,01,05, 


C3,32,0E,BC,22 
84,Al,32,CF,BB 
32,B4,BB,21,DB 
BB,DD,7E,00,32 
7E,02,32,0F,A0 
76,CD,19,BD,3E 
Bl,21,00,A0,22 
CB,54,3A,C1,Al 
20,06,3A,BF,Al 
32,C8,Bl,11,30 
00,ED,B0,CD,Al 
Al,2F,32,BE,Al 
Bl,FE,01,3E,AA 
88,28,02,3E,80 
30, FB,C9,F5,CD 
El,El,32,BF,Al 
DD,79,30,05,3E 
Ci,32,CI,Al,E5 
21,7F,02,CD,84 
F5,32,21,AC,CD 
D5, F5,3A,BE,Al 
C4,7B,A0,Fl,Dl 
Bl,11,DA,Bl,01 
B0,3E,FF,32,BE 

21, AC,3C,32,C0 
Al,3C,CD,56,Al 

22, B5,BB,21,Bl 
B9,3A,BF,Al,32 
8C,7F,B1,ED,79 
01,34,Al,21,C3 
BC.42,A1.C3.3C 
A0.C3,53,Al,C3 
CE,4F,46,C6,41 
53,D4,44,45,4C 
DD,7E,02,FE,05 
07,BC,ED,49,04 
79, DD,7E,00,E6 
BC,ED,49,04,ED 


[15301 
[13623 
[10863 
[11963 
[12883 
[15303 
[673 3 
[15633 
[11643 
[5883 
[14113 
[13063 
[9523 
[12703 
[19853 
[12823 
[20233 
(10923 
[15853 
[9123 
[9673 
(22873 
[16853 
(20263 
[12663 
[7783 
[13183 
[17793 
[14413 
[16473 
[12993 
[8423 
[15033 
(11203 
[13613 
[16933 
[15913 
[10873 
[10363 
[10173 


490 DATA 79,FB,C3,68,A0,DD,7E,02 [10723 

500 DATA 3C,32,C2,Al,DD,7E,00,3C C17403 

510 DATA 32.C0,A1,C9,3A,C8,B1,F5 [16073 

520 DATA 3A,BF,Al,32,C8,Bl,E5,D5 [12183 

530 DATA E5,D5,CD,CD,A1,11,D0,A1 C15193 

540 DATA CD,B5,Al,Dl,El,3A,CI,Al [16883 

550 DATA 32,CB,Bl,CD,CD,Al,11,D4 [9053 

560 DATA Al,CD,'85,Al,Dl, El, Fl,32 [7703 

570 DATA C8,Bl,C3,CD,Al,21,30,B3 (19913 

580 DATA 01,04, 00, ED,B0, C9, 00,02 [17523 

590 DATA 01,02,01,00,00,00,00,CF [15343 

600 DATA CA,8A,CF,E8,90,CF,34,97 [10953 

610 DATA 00,00,7f,02,00,00,7f,02 [8243 

620 SAVE"multlmod. bin” , B, &A000,&1D8 [15633 

630 CALL &A12B :" ESX EINBINDEH [17493 

640 ION,1,6 :"alles einbinden [18283 

650 KODE 2 :"zur Initialisierung [20183 

660 !OFF :'ruecksetzen [13133 

670 NEW C3183 


Listing 2 


10 SYMBOL 255,102,60,102,195,195,102,60 


20 

30 

40 

50 

60 

70 


#*###**#»#***######*»**«#*«#«** 
’* MULT IMODE * 

’ * * 
> * BY * 

’* ANDREAS SCHROEER * 

»*#****#»*#«««********«********* 


80 MEMORY &9FFF 

90 LOAD”3TULT1 MOD, bin” : CALL 3sA12B 
100 !ON,6,4:!ADJUST,2,0 :’FENSTER VON 

GANZ OBEN <6> BIS ZUR MITTE 
110 !DELAY,0,11 
STE DAMIT FLIMMERFREI SEIN 
120 BORDER 3 


1 FENSTER MUES 


130 MODE 2,0:PEN 1 
2 ,IM FENSTER MODE 0 
140 INK 0,0,1 
Z , IM FENSTER:BLAU 


'NORMAL :MODE 
1 NORMAL:SCWAR 


[21593 
[12233 
[406 3 
[ 1753 
(227 3 
[17503 
[12233 
[ 1343 
(31843 
[30783 

[30033 

C10173 
(14573 

[29913 



w 


ACHTUNG! ;; 

Die Sensation der Amstrad Computer-Show in London 


Multiface -das Kopierprogramm 

Multiface lwo - das heißt für Sie 3 Funktionen in einem!!!!! 

- Vollständige Kopiereinrichtung für Kassetten uno Disketten. 

- Besteht aus 8KRam und 8K Rom Erweiterung und wird lediglich auf Expansionsport 
ihres CPC (464, 664.6128) aufgesleckt 

-Wahlweises Kopieren von Kassette aut Diskette und umgekehrt, sowie von Kassette zu 
Kassette und Diskette zu Diskette 

-Kopiert jedes im Speichei stehende Programm aut Kassette oder Diskette. 
-Einsichtmöglichkeit in Programme und Hardware über Bildschirm 
-“Friert" sowohl Bild als auch Programm an iedem beliebigen Punkt ein speichert es 
ab und macht spateren Zugriff möglich (hervorragend geeignet tur Gralikanwendungen) 
-Menügesteuert und vollständige Fehlerabsicherung 
-Komprimierte Datenabspeicherung dadurch geringer ßedarl an Speicherplatz auf 
Ihrer Kassette oder Diskette 

-Ladezeit von 54K Programmen: Diskette unter 20sec (Kassette unter Mm 
-Reset-Taste eingebaut, beeinträchtigt nicht 8K-Ram Erweiterung 
-Weitere Anschlußmöglichkeifen über Erweiterungsbus 

Einführungspreis 178,—DM 

Ausführliches Info erteilen wir gern auf Anfrage 


Potsdamer Rmg 10-7150 Badcnang • |g 07191/1528-29 


Händleranfragen erwünscht 

Schulen und Userclubs 
(mit Clubnachweis!) erhalten 
Sonderkonditionen. 
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r~Tips & Tricks 



] 


150 INK 1,24,19 C429] 

160 WINDOW #4,1,20,1,11 :'WINDOW IM MO C2974] 

DE 0 

170 WINDOW #0,25,80,12,25 s'WINDOW IN MO C2631] 
DE 2 

180 LOCATE #7,6,4:PEN #7,1:PR INT#7,"MULT IM C20913 
ODE" 

190 LOCATE #7,2,10:PRINT#7,"by ANDREAS SCH [2735] 
R"CHR$(255)"ER" 

200 LOCATE 1,5:PRINT"DIESES PROGRAMM ERLAU C3285] 
BT ES EIN":PRINT 

210 PRINT”FENSTER ZU DEFINlEREN, IN DEM”:PR C2601] 
INT 

220 PRINT"4 FARBEN UND DER MODUS ANDERS":P C3039] 
RI NT 

230 PR INT"ALS AUF DEM REST DES BILDSCHIRMS C2529] 
SIND."SPRINT 

240 PRINT"DER GESCHWINDIGKEITSVERLUST BETR C34981 
AEGT NUR 1.4* 

250 ’*####*«####*#»««###*#«#*####**##*##** [1671] 
#** 

260 ># BEFEHLE ERKLÄREN [1114] 

# 

270 ’ ii***»«*»*»»**»*******###»*»**»*»*#*»# £1671] 
*«# 


280 

CALL &BB06 

£3931 

290 

!ON,6,5 

£675 3 

300 

INK 1,19,24 

£480] 

310 

WINDOW #7,1,20,1,5 

[1467] 

320 

WINDOW #0,22,80,8,25 

£12611 

330 

CLS:CLS #4 

£2291 

340 

LOCATE #7,5,2:PEN #7,1 

£11291 

350 

PR INT#7,"DIE BEFEHLE 

£9533 

360 

PRINT"iON,a,b 

£34221 


a,b :1..6":LOCATE 1,6 

370 PRINT" DER BEFEHL BESTIMMT DIE GR [5070] 

ENZEN DES FENSTERS ."sPRINT 

380 PRINT" a LEGT FEST , WO DAS FEN £4600] 

STER BEGINNT ."sPRINT 

390 PRINT" b LEGT FEST , WO DAS FEN '[44921 

STER ENDET ."sPRINT 

400 PRINT" ’6’ BEDEUTET DABEI GANZ OB £27211 

EN,"sPRINT 

410 PRINT" ’5 ' LIEGT ca. 6 ZEILEN D C30371 

ARUNTER usw." 

420 *#»*»»**»#**»#*#*********** £9781 

430 CALL &BB06:CLS £6101 

440 PR 1NT"MODE a,b [48733 

a,b : 0..2"sLOCATE 1,5 

450 PRINT" a IST DER MODE AUF DEM NOR [4844] 

MALEN BILDSCHIRM ."sPRINT 

460 PRINT" b IST DER MODE IM FENSTER £44151 

."sPRINT 

470 PRINT" WENN b FEHLT , GILT a AUF £33211 

DEM GANZEN BILDSCHIRM ." 

480 '»#**»******»**#»»**»*»** £7681 

490 CALL &BB06:CLS:WINDOW #0,16,80,9,25 [19291 

500 PR I NT"INK a,b,c a £41261 

: 0..15 ; b,c :0..26":L0CATE 1,5 

510 PRINT" a IST DIE NUMMER DES FA £46431 

RBREGISTERS ."sPRINT 

520 PRINT" b IST DIE FARBE AUF DEM £37031 

NORMALEN BILDSCHIRM ."sPRINT 
530 PRINT" c IST DIE FARBE IM FENS £4860] 

TER ."SPRINT 

540 PRINT" WENN c FEHLT , GILT b FUE [53651 

R DEN GANZEN BILDSCHIRM ."sPRINT 

550 PRINT" ALLE INKS KOENNEN NICHT M £30371 

EHR BLINKEN ." 

560 ’»»»»#»***»»«#»#»##***##»«»*» £11641 

570 CALL &BB06:CLS £6101 

580 PRINT"!ADJUST,a,b £42991 

a : 0. . 4 ; b : 0..1":LOCATE 1,5 

590 PRINT" DER NORMALE WERT FUE £40051 

R a IST 2 ."sPRINT 

600 PRINT" DIE ANDEREN WERTE VE £37391 

RSCHI EBEN DAS"sPRINT 

610 PRINT" FENSTER UM 1-2 ZEILE £5598] 

N NACH OBEN ODER UNTEN ."sPRINT 

620 PRINT" ( EINE ERHOEHUNG SCH £47051 

IEBT DAS FENSTER NACH UNTEN .)":PRINT 
630 PRINT" b DIENT ZUR FEINEINS £44311 

TELLUNG . BEI b=l LIEGT DAS";PRINT 
640 PRINT” FENSTER EINE PIXELZE £4667] 

ILE WEITER OBEN ALS BEI b=0 ." 

650 ’#*****##*####»#*###*#####*#**#* 
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660 CALL &BB06:CLS 

670 !DELAY,0,5 :’FLACKERN DEUTLICH SIC 

HTBAR MACHEN 

680 PRINT"!DELAY,a,b 

a,b : 0..255":LOCATE 1,5 
690 PRINT" DER BEFEHL DIENT ZUR BESEI 

TIGUNG DES FLACKERNS .":PR I NT 
700 PRINT" DER NORMALWERT FUER a UND 

b IST 0 .":PRINT 

710 PRINT" EINE ERHOEHUNG VERSCHIEBT 

DIE FLACKERGRENZE NACH RECHTS .":PRINT 
720 PRINT" DIE WERTE SOLLTEN NICHT ZU 

HOCH GEWAEHLT WERDEN . " 

730 '##*##*»**#*«*###**»*«1*)****«**#*»* 

740 CALL &BB06:CLS:!DELAY,0,11 

750 PRINT"!OFF":LOCATE 1,5 

760 PRINT" DER BEFEHL SCHALTET DAS 

FENSTER AUS ."sPRINT 

770 PRINT" ADJUST UND DELAY WERDEN 

ZURUECKGESETZT .":PRINT 

780 PRINT" DAS BLINKEN DER INKS IST 

WIEDER MOEGLICH ." 

790 >*****#»***»#*##**#»*#***«#»***#*»##** 
#«#*##»###* 

800 '* TEXT- UND GRAPHIKAUSGABE 

* 

810 ’*##*»*#*##*»»#*#*****###«#**##*****## 
#**#*###### 

820 CALL &BB06 

830 !ON,6,3:!ADJUST,1,0 FENSTER EINSTELL 
EN 

040 MODE 2 

850 INK 0,0,3:INK 1,13,19:BORDER 1 
860 WINDOW #7,6,80,1,17 
870 WINDOW #0,6,80,18,25 
880 PR INT#7:PR I NT #7," 

”:PR I NT #7 

890 PR INT#7,"UM TEXTE AUSGEBEN ZU KOENNEN 
MUSS NUR DAS GETAN WERDEN,":PRSNT#7 
900 PRINT#?,"WAS SOWIESO SINNVOLL IST ,NAE 
ML I CH EIN WINDOW UEBER DAS FENSTER":PR I NT# 
7 

910 PR INT#7,"ZU LEGEN . DIE WINDOWS 4-7 FU 
NKTIONI EREN NUR IM MODUS DES FENSTERSPR 
1 NT#7 

920 PR INT#7,"DAS BEZIEHT SICH AUF DIE BEFE 
HLE PRINT,PEN,PAPER,WINDOW,TAG,CLS,":PR1N 
T#7 

930 PR!NT#7,"TAGOFF,INPUT,LINE INPUT,W1NDO 
W,LOCATE . DIE WINDOWS 0-3 ":PRINT#7 
940 PR!NT#7,"FUKTIONI EREN NUR AUF DEM REST 
DES BILDSCHIRMS RICHTIG." 

950 FRirT" GRAPHIKAUSGA 

BE”:PRINT 

960 PR INT"WENN DAS DURCH DIE OBEN GENANNTE 
N BEFEHLE ZULETZT ANGEWAEHLTE":PR I NT 
970 PR 1NT"WINDOW > 3 WAR , 1 ST DIE GRAPH IKA 
USGABE IM FENSTER EINGESCHALTET . ":PR I NT 
980 PRINT"z.B. PEN 2 oder TAG #2 -> NORMAL 
; LOCATE #7,3,3 -> FENSTER" 

990 ’**##«*###»*##***»**»*#####*#*#«### 
1000 CALL &BB06 

1010 ! OFF: MODE 1:PEN 1-.PAPER 0 
1020 WINDOW #0,3,37,2,24 

1030 PRINT"- DIE ROUTINE BESTEHT AUS 472 B 
YTES MCODE .":PRINT 

1040 PRINT"- WENN EIN INTERRUPT UNTERDRUEC 
KT WIRD ,VERSCHIEBT SICH DAS FENSTER .ES 
KANN VON BASIC MIT !ON (OHNEPARAMETER) 
UND VON MASCHINENSPRACHEN IT CALL &A068 
ZURUECKGESCHOBEN WERDEN .":PRINT 
1050 INK 2,19:PEN 2:PRINT"- BEI TEXT- UND 
NOTWEND 

F1NMAL PENund PAPER bzw. GRAPEN ZU S 
ETZEN. z.B. PEN 3 ODER PEN #7,1 ODER 
PLOT 4,4,1" 

1060 PEN 1:PR INT:PR INT”- DIE ROUTINE VERB 
1 EGT FOLGENDE VEKTOREN :":PRINT"SCR SET 
MODE (&BC0E)":PRINT"TXT STREAM SELEC 

T <&BBB4)”:PR[NT"GRA WIN WIDTH C&BBC 

F>" 

1070 CALL &BB06:GOTO 100 


C 6101 
C 2542 3 

[2801] 

C42103 

[3436] 

[5037] 

[3616] 

[1416] 
[1704] 
C1401 ] 
[3480] 

[3221] 

[2975] 

[1838] 

[1726] 

[1838] 

[393] 

[2702] 

[513] 

[12511 

[1438] 

[724] 

(3469) 

[3414] 

[5588] 


C 6997] 


[5619) 


[4121] 

[4312] 

[3021] 

[6183] 

[5524] 

13488] 

[1391] 
[393] 
[2293] 
t1449] 
[3544] 

E12196] 


[13006] 


[8326J 


[1169] 


ES GIBT VIELE 

COMPUTERZEITSCHRIFTEN... 

DAS KONZEPT VON 
PASCAL ISTANDERS! 


- I - DAS COMPUTERMAGAZIN FÜR HOCHSPRACHEN 



Praktische Erfahrungen 
mit Turbo Prolog 


PASCAL, DAS COMPUTERMAGAZIN 
FÜR HOCHSPRACHEN BRINGT FÜR ALLE 
COMPUTER: 

Reportagen und Interviews 
Praxishilfen, Programme, Tools, 
Anwendungsbeispiele 
Programmierwerkzeuge: Ausführliche 
Vorstellung, Reviews, 

Berichte aus der Branche 
Wissenschaft und Technik 
Hardware, Anwendungssoftware: 

News und Produktinformation 
Büchermarkt, Clubs, Tips & Tricks, 
Rechtsfragen, Feuilleton 
und, und, und... 

PASCAL GIBT ES AB 3.12. BEI 
IHREM ZEITSCHRIFTENHÄNDLER 

oder direkt von 

DMV GmbH ■ PASCAL International 
Postfach 250 ■ 3440 Eschwege • Tel.: (0 56 51) 87 02 



















[—Abenteuer 


Terrormolinos 

oder Tips für einen 

mörderischen 

Urlaub 


Von unserem Adventurecrac Jan Hennig 
stammen die folgenden hilfreichen 
Tips zu dem Melbournehouse Aben¬ 
teuer „Terrormolinos”. 

1. Für den Flug nach Spanien braucht 
man unbedingt die Badehose, die 
Kamera, den Koffer, die Harpune, 
das Taschentuch, den Pass und die 
Tickets. 

2. In Spanien in das Hotel ”Excrucio” 
gehen, die anderen beiden meiden. 



4? I £ I & 


3. Um an den Strand zu gelangen, 
muß man die Lotion auftragen, ei¬ 
nen Knoten ins Taschentuch ma¬ 
chen, das Taschentuch aufsetzen 
und die Badehose anziehen. 

4. Um den Hai zu töten, benötigen Sie 
die Harpune. Um das Gerät abzu¬ 
feuern geben Sie einfach ”Fire 
Gun” ein. 

5. Um den Film in die Kamera einzu¬ 
legen, einfach "Load Camera” ein¬ 
geben. Das Blitzlicht wird mit "Fit 
Flash” betriebsbereit gemacht. 

6. Am Strand alles aufsammeln (wirk¬ 
lich alles!!), aber nicht im Wasser. 

7. In der Bar und im Weinkeller die 
Blitzlichter installieren. 

8. Beim Stierkampf am besten das 
Taschentuch vom Kopf nehmen 
und damit wedeln. Dann solange in 
der Stadt herumlaufen, bis der 
Stier in das Fenster des chinesischen 
Geschäftes gerannt ist. 

9. Bei der Weinprobe zuerst das Foto 
machen, danach erst die Spinne 
töten. 


10. Im Kloster auf dem Kirchturm ein 
Foto machen, dann sollten Sie sich 
in die Katakomben begeben und 
dort Mr. Snargsby suchen. 

11. Um wieder nach Hause zu kom¬ 
men, brauchen Sie den Pass und 
die Tickets. 

12. Auf keinen Fall den Rasierschaum 
und den Sandeimer mitnehmen. 

13. Wer will, kann sich mit folgenden 
Einzelaufgaben noch 10 % verdie¬ 
nen: 

Im Restaurant das „Essen” essen 
und hinterher die Pillen nehmen. 
Den Schnorchel anziehen, ins 
Wasser gehen und "Swimm” ein¬ 
geben 

Soweit die Tips, mit denen wir Ihnen 
hoffentlich nicht zu viel verraten ha¬ 
ben. Sollten Sie trotzdem noch Pro¬ 
bleme mit Ihrem Horrorurlaub in 
Spanien haben: dank einiger Nacht¬ 
schichten hat unser Jan das kom¬ 
plette Spiel gelöst, ergo sind wir in der 
Lage, weiterführende Tips am heißen 
Draht zu geben. 

Alles roger? 

(JH/HS) 
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1. Dachboden. 2. Schlafzimmer, 3. Garten. 

4. Spielzimmer, 5. Flur, 6. Bad, 7. Küche, 8. Flur, 
9. Abstellkammer, 10. Straße, 11./12./13. Flughafen, 
14. Rollfeld, 15./17./18./19. Strand, 16. Insel, 

20. Einkaufszentrum, 21. Bar, 22. Nachtclub, 
23V24. Meer, 25. Restaurant. 26. Plaza. 

27. Bushaltestelle, 28. Rezeption, 29. Hotelzimmer, 
30. Swimming Pool, 31. Glockenturm, 32. Turm. 
33. Klostergarten, 34. Kloster, 35. Arena, 36. Sitz, 
37. Tunnel, 38./39./40./41./42./43. Straße, 
43./44./45,/47. Weingarten, 4S./49. Weinkeller, 

50. Weinlager 
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Gamers 

Message 

Diesen Monat müssen die Adventures 
ein wenig hinten anstehen - mit gutem 
Grund. Denn diesmal sollen die Spiele¬ 
tips, und ganz, besonders die kleinen 
Listings, die manchmal viel helfen, im 
Vordergrund stehen. 

Als erstes hätte ich da ein kleines 
Programm anzubieten, das allen 
Storm-Spielem sicherlich sehr gele¬ 
gen kommt. Zum einen ermöglicht es 
im Ein-Spieler-Modus mit einem 
Joystick zu spielen, zum anderen 
aktiviert es die Rüstung, die man 
ohne dieses Proggy zwar einsammeln 
kann, die aber nichts bewirkt. 
Tippen Sie das Programm einfach ab, 
und versichern Sie sich, keine Fehler 
eingebaut zu haben. Legen Sie nun 
die original Storm-Kassette ein, und 
starten das Proggy mit "RUN”. Das 
Hauptprogramm wird nachgeladen 
und automatisch mit dem Poke 
versehen. 



Ein echtes Luxusprogramm haben 
wir für alle frustrierten Besitzer der 
Kassettenversion von Ghosts’n Gob- 
lins. Wie Sie anhand des untenste¬ 
henden Programms erkennen kön¬ 
nen, hat es hier mehr als einen 
Poke. 

Der Poke in Zeile 20 verhilft Ihnen zu 
unendlichen Leben. Zeile 30 versetzt 


5 REM*** Storm Help 
*** 

10 DATA 00,3a,a5,57, 
fe,05,20,04,cd,03,Od 
20 DATA c9,3a,50,00, 
b7,c4,5a,Od,af,32,50 
30 DATA 00,21,le,Od, 
e5,36,c9,cd,0c,Od,el 
40 DATA 36,3a,cd,24, 
bb,f5,cb,67,c4,e6,Od 
50 DATA fl,47,3e,00, 
cb,40,20,10,cb,58,20 
60 DATA Ob,cb,48,20, 
06,cb,50,20,01,c9,3c 
70 DATA 3c,3c,e6,03, 
32,41,57,3c,32,50,00 
80 DATA c9,06,00,11, 
70,01,cd,77,bc,21,70 
90 DATA 01,cd,83,bc, 
cd,7a,bc,21,51,00,22 
100 DATA de,Oc,21,be 
,00,22,aa,lc,c3,70,0 
1 

110 DATA cd,04,20,cd 
,05,22,cd,6 0,lc,c9 
120 y=0:MEMORY &3000 
130 FOR x=&50 TO &C7 
:READ a$ 

140 a=VAL("&"+a$): PO 
KE x, a 

150 y=y+a:NEXT 
160 IF y<>&2C53 THEN 
PRINT "Data error!” 

: END 

170 LOAD”des",&35C0 
180 LOAD"!",&7D74:LO 
AD"!",&5500 
190 CALL &9E 



Sie jedesmal, wenn Sie sterben, an 
den Anfang des nächsten Levels. 
Zeile 40 verlangsamt das ganze Spiel. 
Zeile 50 macht Sie unverwundbar - 
nur ins Wasser dürfen Sie nicht hüp¬ 
fen, da hilft auch dieser Poke nichts 
mehr. Zeile 60 bewirkt, daß Sie je¬ 
desmal in das nächste Level versetzt 
werden, wenn Sie "ESCAPE” drük- 


ken. Zeile 70 läßt die Zombies schnel¬ 
ler erscheinen. Verfahren Sie auch 
mit diesem Poke wie im Falle von 
Storm beschrieben, und suchen Sie 
sich einfach die Eigenschaften aus, 
mit denen Sie Ihre nächste Runde 
Ghosts’n Goblins bestreiten wollen. 
Die Zeilen, die Ihnen nicht Zusagen, 
lassen Sie einfach weg. 


5 REM*** GHOSTS’N GO 
BLINS HELP *** 

10 MEMORY 4863:LOAD" 
code" 

20 POKE 20636,0 
30 POKE 20633,24 
40 POKE 33421,0 
50 POKE 33410,0 
60 POKE 20630,200 
70 POKE 34148,0:POKE 
34149,0 
80 CALL 20480 


Mit dem kleinen Radzone-Listing, 
angewandt wie die anderen beiden 
auch, erhalten Sie auch bei diesem 
Spiel unendliche Leben. 


5 REM** RADZONE HELP 
** 

10 FOR f=&BB48 TO &B 
B4D 

20 READ a:POKE f,a:N 
EXT 

30 DATA &21,&ee,&09, 
&36,&67,&c9 
40 RUN" 


Bevor wir Ihnen jetzt noch einige 
kleine Tips in Sachen Adventure ge¬ 
ben, noch ein einzelner kleiner Poke, 
mit dem Sie in der Lage sein werden, 
sich das ganze Spielfeld von Bounder 
einmal anzusehen. 

Einfach POKE 800,201 eingeben und 
danach das eigentliche Spiel laden, 
ohne den Computer zurückzusetzen 
(Reset). Jetzt müssen Sie nur noch 
warten, bis die „Scrolling Message” 
Ihnen mitteilt, daß Sie sich im Cheat- 
Mode befinden - und schon kann's 
losgehen. 

Soweit das Poke’O’Mania für 
diesen Monat. Jetzt wünsche ich noch 
viel Spaß mit den Terrormolinos 
Tips, und Tschüß bis nächsten 
Monat. (HS) 
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Bitte nur weiterlesen, 
wenn Sie etwas gewinnen möchten... 


Sie haben sich also entschlossen, weiterzulesen - 
recht haben Sie - denn das, was wir und Infocom hier 
für Sie vorbereitet haben, ist wirklich nicht von 
schlechten Eltern. Wir, das heißt die Schneider CPC 
International Redaktion, brauchen uns wohl nicht 
extra vorzustellen. Infocom allerdings kennen Sie viel¬ 
leicht noch nicht und deshalb möchte ich sie Ihnen 
hier nocheinmal vorstellen: 

Daß es sich bei Adventures um ausgesprochen ge¬ 
wiefte und mehr oder weniger schwere Rätselspiele, 
die über Texte mit dem Spieler korrespondieren, han¬ 
delt, sollte inzwischen jedermann wissen. Wie überall 
sonst, gibt es auch unter den Adventures solche und 
solche. Es gibt gute Adventures, schlechte Adventures, 
Adventures mit Grafik oder ohne, Adventures mit 
Help-Fuktionen oder ohne dieselben, und... und... 
Dieser Art Spiele hat sich die Firma Infocom mit Haut 
und Haaren verschrieben. Die Infocom Adventures 
verzichten auf alle unnötigen Schnörkel, wie bei¬ 
spielsweise Grafik. Statt dessen wird größter Wert auf 
die Gestaltung der Texte und Beschreibungen gelegt. 
An diesen wird dann auch so lange herumgefeilt, bis 
sie einen durchaus literarisch zu nennenden Stan¬ 
dard erreicht haben. Außerdem wimmelt es in 
Infocom Adventures von interaktiven Charakteren, 
das heißt Spielfiguren, die sozusagen in der Lage sind, 
einen eigenen, wenn auch nur geschickt program¬ 
mierten, Willen zu entwickeln. 

An diesen Spielen wird auch jeder Adventure-Spieler, 
der sich an so manchem anderen Adventure mit 
einem geringen Wortschatz regelrecht schwarz geär¬ 
gert hat, seine helle Freude haben. Denn nicht nur 
Unmengen an beschreibendem Text erwartet den 
Spieler, die Programme verfügen auch über einen 


immensen Wortschatz, der eine fast natürliche Kom¬ 
munikation mit den Spielen ermöglicht. 

Bis vor kurzem konnten CPC-Benutzer nur neidisch 
zu den Besitzern anderer Systeme hinüberschauen, 
da es die Infocom Adventurekleinodien bisher nicht 
für die CPC’s gab. Seit Oktober diesen Jahres aber ist 
auch diese Durststrecke beendet, denn endlich sind 
die Infocom Produkte auch für die CPC-Systeme er¬ 
hältlich. Einzige Bedingung ist ein Diskettenlauf¬ 
werk, da die Programme unter C/PM laufen und da¬ 
her ausschließlich auf Diskette lieferbar sind. 

Da der Infocom Start für die CPC’s einer kleinen Sen¬ 
sation gleichkommt, dachten wir uns, daß dies eigent¬ 
lich eine gute Gelegenheit sei, um all die fantastischen 
Infocom Adventures zum Thema eines Gewinnspiels 
zu machen. Nebenstehend sehen Sie ein Bild, in dem 
Sie verschiedene Szenen, die einzelnen Infocom Sto¬ 
rys entlehnt wurden, sehen können. Außerdem haben 
wir in diesem Bild die Titel von fünf verschiedenen 
Infocom Programmen versteckt. Wenn Sie nun an 
unserem großen Gewinnspiel teilnehmen wollen, 
brauchen Sie an sich nur die angesprochenen fünf 
Titel aus dem Gewimmel des Bildes herauszusuchen, 
und auf eine Postkarte schreiben. 

Ferner sollten Sie natürlich nicht vergessen, Ihre 
Adresse anzugeben, damit wir wissen, wo wir die Ge¬ 
winne hinschicken müssen. 

Und damit die Damen, die bei uns im Hause die Post 
bearbeiten, angesichts der Fülle Ihrer hoffentlich 
reichlichen Zuschriften nicht vollends den Verstand 
verlieren, schreiben Sie außerdem noch das Kennwort 
»INFOCOM« auf die Karte. 

So, und nun wollen Sie sicherlich auch noch wissen, 
was es nun eigentlich zu gewinnen gibt. 


1 Preis: DM 500,- in Bar und 5 Infocom Adventures 

2 Preis: DM 300,- in Bar und 5 Infocom Adventures 

3 Preis: DM 200,- in Bar und 5 Infocom Adventures 

4 - 10 Preis: je 3 Infocom Adventures, 1 T-Shirt und 1 Poster 
11 - 50 Preis: je 1 Infocom Adventure, 1 T-Shirt und 1 Poster 
51 - 100 Preis: je 1 T-Shirt und 1 Poster 
101 - 150 Preis: je 1 Poster 


Wie Sie sehen, gibt es tatsächlich eine ganze Menge feiner Sachen zu gewinnen. 

Adressieren Sie Ihre Postkarte bitte an folgende Adresse: 

DMV-Verlag • Postfach 250 • 3440 Eschwege 

Bliebe nur noch der Hinweis, daß der Rechtsweg ausgeschlossen ist. 

Eines müßten Sie allerdings noch unbedingt beachten, und das ist der Einsendeschluß. 

Einsendeschluß ist der 14.12.1986 
Es gilt das Datum des Poststempels. 

Nun wünschen wir, das heißt die CPC Redaktion und INFOCOM Deutschland, viel Spaß beim Suchen 

und natürlich viel Glück. 
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[—Händlerverzeichnis 


Backnang 


Castrop-Rauxel ■Löhne/Ostwestfalen 


Computer-Fans finden bei uns alles von: 


commodore 


\ 


«Schneider 

conpvrtsoivwrt 


EfCGUTE IDEE NACH DO) AFOEREN 

Schuster Electronic 

ccwtim iw • Kfe»« 04 * 

Schneider 

coaptaummm 

_ Vertragshandler 

fl Commodore 

Vertragswerkstatt 
Obere Münsterstr. 33 4620 Castrop-Rauxel 


ELEKTRON ! SC H ( 



Schneider Vertragshandler & Servicecenter 
Herd- & Software von A-Z für Ostwestfalen 

FIUZIIEIMEIER 
•Computer* HiFi* Video'TV* 
alles für Schneider vom 464 - Joyce 

■■ Hiaptkilaktf * iMar Kr. H * 4I7Z diu 1 * Tel. *1712/1X41 


Berlin 

1 



Düsseldorf 


Nürnberg 


Ihr starker 


Schneider-Partner 


mükra 

DATEN-TECHNIK 


Schoneberg« Straße S • 1000 Berlin 42 • TeL 030-7S2 91 30/60 


Freiburg 



Wir sind umgezogen 


Schneider 

rnivQi itco nunrtnN 

LUI II U I t_/\ Ult' l-IIIJI I 


BOD 

BÜRO-ORGANISATION 
DATEN! ECHNIK 

Friedenstraße 13 4000 Dusseldorl ' 
Tel 0211/308071 


Beratung - Vertrieb - Service 




Hochstraße 11 
8500 Nürnberg 80 
Tel 0911/26 90 76 


_C«* Schneider_ 

rnfconpumomm 

Wir führen zu den original SCHNEIDER-Produklen Software. Bücher und 
Zubehör verschiedener Firmen wie DATA BECKER. VORTEX. ClIMANA, 
ISS, RUSHWARE. MARKT & TECHNIK. SYBEX, VOGEL-Verlag usw! 



Bektr. + elektronische Geräte. 
Bauelemente +Werkzeuge 

ELECTRONIC VON A-Z 

Stresemannslr. 95 - Berlin 61 
Telefon (030)2611164 



Thörner s 

Büro c^;Z a z a u b s ;h5r Laden 

Das Fachgeschäft speziell für „ausgefallenes" Compuler-Zubohör. 

Mit Beratung! Riesenauawahl .. 5 - 

C-Schneider 5 V/üfteX 

mfconPurEmamtan rn,-T^ 

Unverbindlich 'mal reinschauen) Sie worden überrascht sein! 

B 62, Innsbrucker StraOe 58 wm n » an nn Eine Filiale der Firme 
am Bayerischen Plelx / 04 4U SfZ BürobedarlThemar 


Südbadens 
kompetenter 
Computer-Partner. 

Kaiser-Joseph-Str. 232 
: 7800 Frefcurg, Tel: 0761/2180225 



Rüsseisheim 


(rcommodore c d Schneider 
Dipl. Ing. Neuderth -Computer 

Frankfurter Str 23/Friedansplatz. 6090 Rü«sel»helm 
Tel (0 61 42) 6 84 55, Tx vided 4 182 982 


Hamburg 


Bonn 



RADIO-FERNSEHEN 
HIFI-VIDEO 


Plittersdorfer Straße 206 Telefon 36 40 29 


Jetzt auch bei uns: 

Joyce und CPC 464 + 6128 

Anwenderprogramme z. fl. für Joyce: 
Wordstar 3.0, d Base II, Mulliplan, 
Flnanzb uchhalhing, Business Pack, 
DP DRAW, DR GRAPH, Schach 


Große Auswahl an Spiel- und 
Anwenderprogrammen, Zubehör und 
Literatur für SCHNEIDER und 
COMMODORE. 

Gdrtnerslr S • 7000 Hsnturi 20 - Tel «Z04S71 


C—Schneider 

^conpvrEROMSiüv 

autorisierter Fachhändler 


s SOFT 
I WARE 
1LADEN 


Vellmar 


C . Schneider 

jcoaputer Division 



im Herkules Vellmar, Tel. 05 61 / 82 41 90 
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Würzburg 


HALLER GmbH. Wiirzburg 
dar Spazialisl für alla Schnaidar-Computar. 
Hardware - Software - Zubehör - Sarvlca 
Büttner Str. 29 (hinter Kaufhaut Hertle) 
Telefon: 0931/16705 


Schweiz 


Zürich 



Computers 

zentral in Seebach, Schaffhauser Str. 473,8052 Zürich, 
Telefon: 01-302 26 00 
Versandkatalog anfordern 



In dieses 

Händlerverzeichnis 
können sich alle 


Computer-Händler 


eintragen lassen. 

Für telefonische 
Anfragen 
steht Ihnen 
Herr Schnell 
gern zur Verfügung. 

Telefon: 05651/8702 


Anzeigenschluß 
für die nächste 
Ausgabe (1/87) 
von 

PC Schneider 
International 
ist der 

27.11.86 

Erscheinungstermin 
ist der 

31.12.86 


Achtung! 

An alle CPC-User-Clubs! 
Suchen Sie noch Mitglieder 
oder wollen Kontakte zu 
anderen CPC-Usern oder 
Clubs knüpfen? 

Dann schreiben Sie uns 
doch einfach. Wir veröffent¬ 
lichen jede Anschrift eines 
CPC-User-Clubs gratis! 

Falls auch Ihr User-Club sich 
einmal vorstellen möchte 
(evtl, mit Foto), nutzen Sie 
unsere Zeitschrift als Ver¬ 
bindungsglied und Kontakt¬ 
adresse! 


15 jähriger 6128-Besitzer sucht Kontakt zu an 
deren CPC-Besitzern im Raume Bern: 

Urs Kauer 
Scheibenrain 29 
CH-3014 Bern 


JOYCE USER-CLUB ELMSHORN 

Suche Kontakte zu einem Joyce-User-Club im 
Großraum Hamburg bzw. Interessenten zur 
Gründung eines solchen. 

Henry Bartels 
Konrad-Struve Straße 162 
2200 Elmshorn 


Der 1 Hersbrucker Computerclub hat seine 
Pforten geöffnet!! 

Wir haben alle gängigen Computer Systeme 
(464,664,6128, (!) JOYCE(t), PC 1512, IBM, 
APPLE,..). Rufen Sie doch mal an oder schrei¬ 
ben Sie mir: 

Peter Sieber 
Artelshofen 111 
8561 Vorra 

Telefon: (0 91 52) 80 23 


JOYCE USER-CLUB OBERSCHWABEN 

zu gründen gesucht Kontakt: 

Hasso Kraus 
Rudolfstraße 27-a 
7980 Ravensburg 
Telefon: (07 51)27 19 


Clubgründung im Großraum München ange 
strebt. Interessenten (auch überregional) 
bitte melden bei: 

Andreas Roedenbeck 
Herbststraße 8 
8039 Puchheim/Bhf 
Telefon: (0 89) 80 53 89 


SCHNEIDER CPC-CLUB BAYREUTH 

Mitglieder aus ganz Deutschland gesucht. 
Bitte melden bei: 

M Konrad A Singh 

Fontane 4 Pottaschütte 10 

8580 Bayreuth 8580 Bayreuth 

oder: 

(Rückporto falls vorhanden) 


CPC-Club MAGIC KEY 

sucht Mitglieder im Raum Bremen. 
Infos bei: 

M;chael Hollmann 
Starnberger Straße 46 
2800 Bremen 1 
Telefon: (04 21) 37 37 00 


THE RED ROCK SOFTWARE DEVELOPMENT 

sucht User in 5000 Köln 1 (80) 

System: CPC 6128/brother M-1009 
Sprachen: PAS,BAS,ASM 
Infos von: 

Stefan Schulte Strathaus 
Modemannstraße 24 
5000 Köln 80 


S.O.S.!!! 

Hilfe, ich suche Kontakt zu anderen CPC 
Usern im Raum Verden, meldet Euch bitte bei: 
Dirk Höcherl 
Quellengrund 15 
2810 Verden 

Telefon: (0 42 31)6 38 48 


JOYCE - USER - GROUP - SAAR 

C/0 A Borens 
Postfach 1105 
6638 Dillingen/Saar 
Telefon: (0 68 31) 7 30 52 
Info nur gegen Rückporto 


Berliner User Cub 

Wolfgang Windorpski 
Gritzner Straße 38 
1000 Berlin 41 
Telefon: (0 30) 8 22 77 50 


CPC KONTAKT 

Tausch von original Soft- und Hardware Kein 
Beitrag! Keine Gebühren! 

Ralph Lukas 
Im Junkerbruch 3 
5143 Wassenberg 4 
Telefon: (0 24 32) 34 98 


Amstrad-Schneider-User-Club Aachen 

A.S.U.C.A. 

überregional, nimmt noch Mitglieder auf Club¬ 
zeitung (44 S) gegen 2,50 DM in Briefmarken 
Richard Cloots Uwe Ganter 

Zeißstraße 7 Haarhof 5 

Ub -Palenberg 5100 Aachen 

Tel.:(0 24 51)4 66 08 Tel; (02 41) 
oder: 55 36 04 


Joyce-User-Club Raum Marburg-Kassel 
Gießen-Frankfurt. Suche Kontakt zu einem 
Joyce-User-Club im Raum nördliches Hessen 
bzw Interessenten zur Gründung eines sol¬ 
chen 

Peter Diesler 
Am Grün 56 
3550 Marburg 
Telefon: (0 64 21) 2 49 87 


Kontakt zu CPC-Besitzern in Braunschweig ge¬ 
sucht 

Thomas Klingemann 
Emsstraße 16 
3300 Braunschweig 
Telefon: (05 31)84 48 11 


Berliner Joyce-Benutzer: 

ruft doch mal an! 

Richard Suchenwirth 
Telefon: 3 91 47 80 


Suche CPC-User innerhalb des Ruhrgebiets 
Schreib mal! 

Sascha Nevian 
Vennstraße 9a 

4200 Oberhausen 11, Telefon: (02 08) 68 34 
38 

Für Duisburg Telefon: 15 68 34 38 
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I—Kleinanzeigen 


Biete an Softwan 


Achtung! Einmalige Gelegenheit! 

Software für CRC 464 z.T. schon ab DM 15- 
wegen Systemänderung abzugeben 
Info gegen Rückporto H Zahner. 

Postfach 172, 7140 Ludwigsburg 


Verkaufe Joyce Mailing System DM 160,— 
H Hörster, Schneiderstraße 19, 

4600 Dortmund 50, Tel 736680 


Star-Writer Neu, unbenutzt, mit Sicherheits 
disk und Handbuch DM 160.— 

Th Kloß, Telefon (05 61) 89 71 23 


Org Software (464/664/6128) 

Verk. Turbo Pascal 30 + Grafik 130, DM 
Statistic-Star + Mathe Star je 50,- DM 
Alle Programme aul Disk + Handbuch 
T. Janwlecke, 

Telefon (05742) 1398 


DATAMAT und PROFI-PAINTER, 

Original mit Handbüchern jeweils DM 60, 
CPC Zeitschriften 4/86-9/86 
und Sonderhefte, 

Telefon (0 73 45) 33 31 


DREIKA-TEXT, 

Textverarbeitung für Schüler und Studenten, 
2 Zeichensätze - 96 Zeichen frei definierbar 
(Mathe, Fremdsprachen) DM 59, 

Info DM 0,80 
Kolfenbach 2300 Kiel 1, 

Projensdorferstraße 26 a G 


AKTIENVERWALTUNG ■ AKTIENANALYSE 
Balken-, Liniengrafik, ol Durchschnitte etc, 
Info 2,- DM, Disk 79.50 DM 
Dieter Borchers, Schönstedtstraße 6. 

1000 Berlin 44 G 


Biete Texpack (VB120- DM)unüAdress-Verw. 
(VB 50.- DM) an Tel (0961)35595 


Programme aus Eigenentwicklung für alle 
CPC's bei Friedrich Neuper, 8473 Plreirnd, 
Postfach 72 

Kostenloses Info anfordern G 


........ zebra . SO ft . 

Bewährte Mietshaus-Verwaltung für Joyce: 
Bel viele Wohnungen, Häuser, Nebenkosten/ 
NK-Abrechnung/Bilanz/Mahnschr. etc 
Info bei Perin, 

Luisenstr. 37 5100 Aachen G 


: PICO-FORM 

i Textverarbeitung 

i Textarithmetik 

I Karteiverwaltung 

I DER PREISHIT VON PICOSOFT 

: DREI PROGRAMME IN EINEM! 

: Für CPC 464, 664, 6128 

: DM 59,- 

: Aul Kasselte oder Diskette 

t 3 Zoll oder 5 1/4 Zoll 

: GRATISINFO - LIEFERUNG 

: Dipl Ing Klaus Firrihaber 

: Rehmkamp 8, 2300 Altenholz G 


Psychologische Tests v. Dipl Psychologen / 
Persönlichkeitstest u a / Psychosoft 
H L Benedikt, 1000 Berlin 51, 

Preis49,- /Schecki.V. (030)4921621 
(pro Diskette 3 lesls) G 


DEVPACK (Disk) DM 70. (0 81 42) 5 15 26 


Viele preiswerte Spiele, Mathe, Anwend 
(z B MINIVISICALC, TOTO) vnri 2 bis 28 DM! 
Katalog geg 1,- DM 
SCHNEiDERSOFT, Andreas Wagner, 
Gartenstr. 4,8201 Neubeuern G 


CPC-Schneicer Flugtraining 
für CPC 464. 664, 6128. 

Umfassende Bewertung der Flüge 

A) Hubschrauber-Simulator in Aktion 

9 Anzeigen im Cockpit 3 Flugprogr. zur Wahl 
29 DM 

B) Space Shuttle-Landung, Echzeitsimulation, 

nach NASA Unterlagen 29 DM 

C) Boeing-727 Simulator. Dies Programm ist 

zur Anfänger- und Instrumenten-Flugschulung 
geeignet Mit Anleitung 34 DM 

Ab 2 Program, jedes minus 5 DM. 

Aut Disk plus 7 DM 
Info gegen RücK.porto 
Fluging 

F. Jahnke, 3344 Flöthe 1 

Telefon (053 41) 91618 G 


**‘Z 80-Assembler*** 

erzeugt OBJ u COM-Files, Add u Subtr. in Va 
riablen, Demo-Code u Anleitung! 

Form 3'' Disk, 

10,- DM u Freiumschlag an 
H Hoobie, Sielkamp 1a, 3300 ßraunschweig 


Lohn-Est Programm 86. 40 kBytes, neueste 
Gesetze + Tabelle, Schirm, Drucker, alle An 
tragsgründe 

J Bornemann, ßerlinerstr 42 

2407 Bad Schwartau (Scheck 45 DM) 

NEU, Unterhaltsberechnung 20 DM G 


ACHTUNG JOYCE-BESITZER! 

Habe wegen Systemwechsel P'ograrnme + 
Spiele + Leerdisc lei (0421) 325612 


Schneider Softwarekataiog mit 80 Pg 
ab 10 DM lür 1 DM in Marken 
von Fa Weisel, Poslf 505, 

5412 Ransbach. G 


Spiele (Originalcasseltsn) zu ca. 60°/c vom 
Neupreis 

Liste gegen Rückporto 

Rüdiger Becklein Nr. 38,7189 Unterspellach. 


*** Biorhythmus lür Joyce PCW *** 

Druckt Ihre natürlichen Biowerte als Siriuskur 
ven oder Biowerte v. 1- 365 Tagen mit Partner 
vergleich Nur DM 74,85 mkl ausführl Erklä 
rungen 

Info von K Junker, 

Adolf-Möller-Str. 1, 6390 Usingen 


* Schreiben dBase Anwendungen' 

N Schümann/K Töllner, 2250 Husum Am 
Gailberg 74, Tel (04841)73293 G 


Joyce Datei Star von Star-Division 
Th. Lampe, Flensburg, 

Tel (0461) 61255 


Voll Publik Domain, Ut I. Spiele, Advent zu 
rück: 3" Disk + 10 DM an: 

U Claus, Enzianstr. 10, 7464 Schömberg 


Wordstar kp 125 DM. Tel (06184) 2762 


LOHN- UND EINKOMMENSTEUER *** 
Super Jahresausgleich + Sleuerkl wähl -i Ren 
tenertrag + Analyse! Für ‘CPC's i- IBM’ Cass 
6C,- DM, Disc 70.— DM Info gg RP Jährl Aktu 
10,- DM! Horst liehen Niederfelderstr.44, 

807? Manching, Tel (0 84 59) 1669 G 


Wirtschaftliche Programme 

für die Arztpraxis auf 
dem Schneider CPC, Joyce, PC 
Fa EFFEKTA, Am Wiogerl 9c 
• 45 Osnabrück, Tel (0541)442416 G * 


Software für Pfennige 

Mieten oder kaufen Sie Freiprogramme und 
Shareware für Ihren Schneider PC Utilities, 
Textverarbeitung, Kopierhilfen, Datenbanken, 
Grafik, Filemanager, Französisch-Kurs, XY-Plct, 
Kalkulation, Spiele usw. 

Fordern Sie noch heute ihr Info-Pack 
mit 3 Kälalog-Diskelferi von 
Esser-Compuler. 

Postfach 5 22b, 51 Aachen, an G 


CPC 464 CPC 664 CPC 6128 
Supersoflware schon ah 3 DM 
Anwendungen, Spiele, Utilities 
Das gibt’s nur bei M Schlarmann, 
Heinnchstr. 18, 2843 Dinklage, 

Liste gg 50 Pf 


'“DIAS ORDNEN MIT JOYCE/CPC“* 
bis zu 30000 Dias pro Diskette Suchzeit ca 
1 Sekunde info gegen Rückoorto bei: 

Dipl hg W. Grotkasten, 

Birnenweg 6, 7060 Schorndorf, 

Tel (071 81) 4 2846 G 


Komplette Hausverwaltung 

für 1-150 Wohneinheiten, mit Nebenkosten 
abrechnung Info: Klaus Frank, 

Friedhotstr. 26, 7101 Löwenstein 


• NEU • mak Lernsoftware CPC • 
Für Schule, Studium und Praxis! Lernsoflwa 
re: Chemie/Physik/Ing/Mathematik usw. 
Info 2, DMBfmk 

• U Hox Ackerstr. 65, 4190 Kleve G • 


DISKETTEN 

* 51/4", 48 tpi, DM 0,99, 2D 

’ 31/2”, 135 tpi, DM 3,19,1DD 

3" Schneider DM 5,85 
auch andere, bes Garantie 

* Allg Auslro-AG, Ringstr.10 

* D 8057 Eching Tel (08133)61 16 G 


3” Diskeiteri 10,50 

3" Disketten CF2DD 17,90 

DD-l/FD-1 468,— 

Datencassetten 5er Pack 5- 

Mandragore C/D 45, /54 - 

Deactivators C/D 27-/45- 

Tempesl C/D 36-/54- 


111 Katalog anfordern 11! 

Software-Studio-Sommerer 
Kreuz 2, 8580 Bayreuth 
Telefon (0921)44520 G 


Wertpapierprogramm lür CPC 464,654,6128 
m Handbuch, Anlage-Strategie und Aktien 
kursen nach Wahl für 198,- DM (Disk) 
GRATIS-INF0, 

Udo Neid Financial Software. Rankestr. 22, 
5600 Wuppertal 2 G 


STAR-WRITER I uno DATEI-STAR nur zus 
150,- DM, Tel (0231)233499 


SUPERCALC21 6128/Joyce, originalverpackt. 
DM 100,- Tel (089) 969677 


Turbo Pascal-Maskengenerator, i 

Masken direkt am Bildschirm erstellen t 
Aufruf durch INC-Datei, 
für IBM kompatible 
Rolf Ellermann, 5 

4840 Rheda-WO, 5 

Postfach 1423, ' 

98,-, Demo 15- 1 


Der Joyce kann ganz schön spielen!’ 


Tomahawk. (3 D Hubschrauber Simul) 5990 

Aftershock (engl Grafik-Adv.) NEU 5290 

Invaders (Spieihallenhil) NEU 45,90 

Batman (3 D Gralik + Sound) 47.90 

Fairligfit (3-D Grafik Adv.) 47,90 

Cyrus II3 D Schach 52,90 

Fakturierung (dBASE Programm) NEU 94 00 

Finanzbuchhallung NEU 194 00 

Public Domain Software ie Disk 2990 

Jede Menge Top-Software für die CPC’s: 

Cyrus II3 D Cbess C/D je 34,90 

Winlergames C 29.90 

Lightforce C/D 25,90/3890 

Mermaid Madness C 28.90 

Druid C 22 9t 1 

Sofort aktuelle Liste anfordern 


SUNSHINE-Software, A d Schilde 14 
5270 Gummersbach, Tel (0 22 61) 7 57 52 
NEU! Ab sofort Direktverkauf in Luxemburg! 
Info unter Tel (00352)8182121! G 


Software lür Joyce: 


Biorhythmus Tab/Graph 

DM 43, 

Adressverwalfung/ 


Direct Mailing 

DM 128 

— Video-Archiv, (m litel-/ 


Schauspieler Auswahl) 

DM 68 

- Vorratsvei wallung 


(z B Tiefkühltruhe) 

DM 68, 

Lieferung mit Vorkasse 



(plus DM DM 3,50 
Porto/Verpackung) oder Nachnahme 
G Niemand 

Karl-Valentin Weg 10, 8011 Kirchheim G 


Lohn- und Einkommensteuer 1966 
Druckerausgabe + Datensicherung 
87er Aktualisierung: 20, DM 
Ausführliche Anleiiung Info: 1,50 DM 
3-Disk f CPC 79,- DM + VR Versand gegen 
Vorkasse oder NN 
S Teurich, Meslernstraße 6. 

4952 Porta Westfalica G 


Superheiße 3” disc mit 20 
digitalisierten Spitzenlolos 
nur bei INTIM-SOFT lür 34,90 
PGiroA München Kto 176 762-808 

KW: Lolita u CPC-Typ angeben G 


Lohn-Einkommensteuer Progr. 86 

CPC 3” Disk + Speichg + Ausdruck 
DM 52,- an A Frydmann, Wilh Busch Sir. 18 
8000 München 71, Lisi DM 6 G 


NOTENVERWALTUNG für die Schule 
Wertung 1-6 oder Pktesystem 0-15 
Wichtung, Schn ttber., Listen 
Druck/Schirm, Notenspiegel 
Unk Beitr. je 65 - DM 3"Disk, 

50.- DM Cass, Info Freiumschlag 
Claus Bernhold, Rommelstraße 31 
8783 Hammelburg G 


JOYCE QUALITÄTS-SOFTWARE: 


‘WINDOW-KASSE 

DM 98 

* WINDOW ADRESS 

DM 98 - 

’ WINDOW LAGER 

DM 198 - 

Finanzbuchhaltung 

DM 194 - 

Sprachen Textverarb 

Utility - 

- Zubehör für alle CPC 

und JOYCE 1 

TASWORD 3” Disk-CPC 

DM 59.90 


MicroM Worms, 4780 Lippstadt 
Johannes-Westermann Platz 1 
Telefon: (02941) 59290 
' Händleranfragen erwünscht * G 
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Kleinanzeigen 


** CPC ** Hannovers ** 

CPC ” 

* SOFTWARETHEK Nr. 1 

* 

Mastertronic-Games 

aC 

9,90 

Rainbow Arts-3 Spiele 

C 

29.- 

Boulder Dash/3D Boxing 

a.C 

32.— 

Knight Games 

C 

39,— 

Hyper Sports 

C/D 

32/54 

The wayof the Tiger 

C/D 

36/49 

Wmlcr Games 

C/D 

39/59 

Yie are Kung Fu 

D 

39- 

Samantha Fox Strip Poker 

D 

59- 

Mega CAD Grafiksystem 

D 

98,— 

fextomat 464/664/6128 

D 

99- 

THE MUSIK SYSTEM 

C/D 

59/79 

sofort CSJ NEWS anfordern 


*’ CSJ COMPUTERSOFT JONIGK ** 

* An der Tiefenriede 27,3000 Hannover 1 ’ 

*** Tel.:(0511) 88 63 83 


G * 


Biete Hardware 


CPC 464 mit Flopoy, Farbmonitor, 

viele Bücher und Software 

tür alle Bereiche in großer Auswahl im Wert von 

2800 DM für nur 1700 DM 

Tel (0711) 31 87 46 ab 18.00 Uhr, 


6128 Color + DMP 2000,6 Mon alt + Soft 
wäre 2000 DM, Tel (08392)1308 


CPC 464 Farbe + NLQ 401 + 2 Joy. + CPC- 
Inter. 3/85 - 10/86 + Div, Softw., 1,5 J, wenig 
gebraucht Nur 1100 DM!! Umständet) 
Telefon (06374) 3341 


464 Farbmonitor + Vortex SP 512 -t- DD 1-1 + 
NLQ 401 + 30 Disketten + Fachliteratur 
(10 Bücher) + er. Software 
für 2000,- DM. 

J Funk, Leuchte 57, 6000 Frankfurt 60 


CPC 464, grün + 2 Bücher + Joy + 20 Kas 
+ 12 Hefte CPC, DM 600, 

Reiner Anoerl, Telefon (0 73 31) 821 04 


• Gelegenheit • 

CPC 464 - 384K, DDS-1 umgebaut in IBM- 
Gehäuse, sep Tastatur, 16 Disk., Software (WS, 
Dafamat, Tasword, etc ) umfangr. Literatur. 
VB 2100,- DM 
Telefon (053 71) 718 55 


CPC 464/Grün + DD11 + Kawon + Software 
(Datam., Tasword, Schach usw. + 

25 Disketten, neuwertig 

Nur kompl DM 1300 (NP heute DM 2500). 

Tel. (081 38) 8312 ab 19 Uhr! 


Typenraddrucker Smith-Corona TP II. Centro 
nies + Seriell. 1 Jahr für 550,- DM. 
Telefon (06151) 3 1 1623 


SSA-1, Sprach-Synth. DM 100- + NN 
Suche def Drucker, übern. Vers. Kosten 
M Egg, Hörbermgerstr. 13, 

8267 Neumarkt/St Veit 


Disk 3”, 35", 525" zu günstigen Preisen; 
Bauleile aller Art, 
detaillierte Anfrage erwünscht. 

H Delmhorst, Turpinstr. 32, 5100 Aachen. 


*** CPC-6128 und Farbmonitor *** 
d Base II, Wordstar, MP, MICA, Profi-Paintec 
Laserbasic, usw.. Bücher, CPC-Magazin und 
Schneider International, 
komplett. VB 1850,- DM 
H. Fischer, Telefon (06644) 7289 


CPC 664 + GT 65 + Vortex Erw. SP 512 + 
30 Disk. + ca 20 Schneider int + Literatur -r 
Joystick + Soiele + Anw, Software, 

VB 1500, - 

Roland Schubert, Telefon (05251) 21639) 


Liefer v, 1a Bauelem zu günst. 

Preisen Preisliste gratis. 

Wolfgang Fleck 
elektronische Bauelemente 
5650 Solingen 1, Berger Straße 19 
Telefon: (0212) 81 15 65 G 

CPC 464,320kB RAM, Vonex 1,4 MB, NLQ 401, 
WS, dBase ua Prog., Literatur, 2600,- DM 
lelefon (02261) 44342 ab 17 Uhr. 


664 Colour + Zubehör 800- DM, Brother 
M-1009 + Traktor 300,- DM, Berliner Glas KG 
Kontraflex-Filter 50,- DM 
Alles neu 

Tel (061 54)81348, Mo-Fr. 8.00 -1630 Uhr. 


!!!! Druckerniedrigpreise !!!! 

Aktuellen Preis ertragen bei: 

ESBW, Vor den Eichen 11,3540 Korbach 24, 
lei (02982) 1263 G 


CPC 464 + 320 K RAM + DDI-1 + NLQ 401 
+ Akustikkopl + Orig Proliprogr. + Spiele 
+ Literatur. 

Telefon (0211)394104 


Verkaufe Joyce PCW 8256, Preis Verhand¬ 
lungssache, Computer nur 6 Monate all. 
Telefon (072 74) 4046 


Schneider CPC 6128 mit Farbmonitor (neu mit 
Garantie), Disketten, Bücher, Zeitschriften (alles 
in Deutsch) zu verkaufen 
Preis VHB. 

Telefon (061 26) 6244 ab 1800 Uhr. 


CPC 464 m. 512 KB u Grünmonitor, Floppy 
DD1 u. Vortex F1-S/5 1/4", DM 1500 VHB. 
auch einzeln zu verkaufen Lautwerke nur zu¬ 
sammen Dazu Literatur u Software (Wordstar, 
Data-Boxen) 

Tel (06202)54021) 


CPC 6128 grün, Kawon 2. Floppy, DMP 2000, 
Dal.Rec.. Star Writer 1 + S-Kopie/Handbuch., 
Elite, Cyrus-Chess, Nexor, Databoxen, 
Leerdisketten, 

halbes Jahr alt. wg. Syslemwechsel 
VB 1800 - 

Schreibt Christoph Cyrus, 

Griegstraße 1A, 2000 Hamburg 50. 


Disk-Laufwerk 51/4", DM 295,- Anschfoßfer- 
tig an 664,6128 oder an DDI-1 
niit Netzteil. 360 K, Seite A/B umschaltbar. 
P. Görsch. 

Tel. (07720) 73 74 


CPC 464 mit Farbmon + DDI-1 + Joystick 
+ Software + Bücher + 40 Helte 

nur 1200- DM! (VB) 

Telefon (0251) 615414 


JOYCE/PLUS 

SPEICHERERW. 99,- 

von 256 kB auf 512 kB 
Aulrüstsatz mit ausführlicher 
Einbauanleitung auch tür Laien 

Telefon (04721) 222 99 
COMPUTER-TEAM 
2190 Cuxhaven 1 

täglich von 16.00 - 20.00 Uhr G 


CPC 464, CPC 664, CPC 6128 User! 
Lichtgriffel mit Programmen und dt Anlei¬ 
tung nur DM 49,-. Versand gegen 
Scheck/Nachnahme Info gratis! 

Fa Schißlbauer. Postfach 1171S, 

8458 Sulzbach. 

lelefon (096 61) 65 92 bis 2100 Uhr. G 


CPC 464 + 51/4" Vortex + 3" DDI + Vortex 
SP 128 + ECB-Bus + NLQ 401, Software von. 
Wordstar bis Spiele, Bücher ca 30 St von Data 
Becker, M+T. Sybex für 3200,- DM alles zu¬ 
sammen ca. 1 Jahr alt 
Tel (069) 838744 


Schneider PC • Neue und gebrauchte CPC 
Hardware- Joyce Floppy • NLQ Drucker 
Software für Finanz-Lohn- und Immobilienver 
waltung/vermittlung ■ Abrechnungsprogram 
me für Arzte • Rechtsanwälte Handwerker • 
Speditionen • KFZ-Handel. Schornsteinfeger. 
Manfred Kobusch. Bergenkamo 8,4750 Unna. 
Telefon (02303) 1 3345 G 


CPC 464 Grün, Extras, VB 45C B Streibl, 
Telefon (089)3203434 


CPC 464 Farbmon 128 K + DDI-1 + Rack + 
Sprachsynlh + Joyst. + Acrylhaube + Bü¬ 
cher + Programme VB 1500.- DM. 

Mario Köster, Bernhardsweg 11,5144 Wegberg 
Telefon (024 34) 3228 


• **•****»•*»**» *** *«** * *• * •* ** *••*•«-*•»»-*****•*« # 
Zu verkaufen: 

CPC 6128 mit Farbmonitor, 

Hanobuch und reichlich Diskettensoftware 
After: 10 Monate 
Preis: 1500, DM (VHB) 

Telefon: (02241) 336002 

»)r»**WxW**»*iHr*fr*W*W***’**»r********»*-*‘W*******-** 


TYPENRAD-DRUCKER DIN A3, neu! 

40 Z, Tr.+Einzelbl, Centr.-IF DM 1500- 
N Berger, Telefon (0 22 71) 6 38 37 


' SONDERANGEBOT ’ SONDERANGEBOT * 

3'-Zweitlaufwerk für CPC 464/664/6128 
• *••»•*»»•-■»»*■»**»«■**»+••*•*•* ••••»*•*•-*•»• 

3’-Einbau-Spif7:er. Laufwerk nur DM 119,— 
Anschlußkabel CPC 464/664 DM 29- 
CPC 6128 DM 39.- 
Passendes Gehäuse 

kpl. mit Netzteil DM 79.— 

Komplettgerät, anschlußfertig montiert 
und geprüft, einschl. Gehäuse, Kabel und 
Netzteil (Rechnertyp angeben) 
für CPC 464/664 DM 259,- 

CPC 6128 DM 269,- 
Tel (0 63 74) 68 78 oder (0 63 59) 25 82 G 


CPC 6128 

Grün 2 Floppy Recorder, 

Bildschirmfilter, oBase Multiplan Wordstar elc. 
40 Disketten Software 
Literatur NP über 4000, DM 
für 1800,- DM 
Telefon (089)4300930 


Joyce mcl. Turbo-Pascal-Multiplan + 9 Disk 
1100- DM Telefon (02501) 8137 


Expansions-Bus-System für CPC 464 
ROM-Platine, 6 Steckpl. Relais-Karte, 

RS 232 + paral Schnittstellen-Karien 
EPROMER m Soflwarest Uhrenkarte 
Atari-Mausst 

Wir haben auch für Sie die CPC-Per pherie 
Neu! PC Hard-i Software 
Burkhardl DT, Schwabstraße 13 
7250 Leonberg • Tel (0 71 52) 2 21 95 G 


* CPC 464 mit Faromonitor' 
viel Soltw, u Liter. NP ca 2000, VK 1200, 
Tel (09198) 573 ab 14 Uhr 


NEU BERLIN-SOFT NEU 
präsentiert 

Die SUPER Soft- und Hardware-Show 

Es gibt fast nichts, was wir nicht liefern 
Sofort Katalog S/3 anfordern gegen Schutzge 
bühr von DM 2,50 in Briefmarken 
Und jetzt der Knüller; Unter je 500 Einsen¬ 
dern wird bis zum 31.12.86 1 DATAPHON 
S21D verlost. Der Rechtsweg ist ausge¬ 
schlossen. Briel sofort an: BERLIN-SOFI 
M Last, 1000 Berlin 47, Str. 231 Nr. 116 G 


CPC 664 + Star Writer + div. 749,- DM 
DMP 2000 + Kabel + Papier 549 - DM 
Vortex Fl X + div. Disk 549,- DM 
kein Gerät über 1 Jahr, fei (04542) 3522 


Verkaufe: 

CPC 464 mit Color-Monitor 800,- DM 

Vortex Speichererweiterung SP 512 200,- DM 
und Schneider RS 232 Schnittstelle70,- DM 
Alles zusammen 999- DM 

Telefon (071 93)8831 von 18-20 Uhr 


Verkaufe CPC 464 mit Colormonitor VB 1000, - 
lelefon (0 22 24) 814 93 


Drucker Seikosha SP1000CPC. 9 Mon all 

600,- DM (VB), Tel (0 55 73) 18 79 


Suche Software 


Suche für Joyce-*- Software für Einsatz in Aulo 

Reisemobilverleih 

R, Schwenkerl. 

7905 Dieienrieim 2, Schullh Häußler-Straße 1-1 

Suche Star-Wnter (Orig.) mögi. preisw. (evtl 
Tausch), sowie MP2 Tel. (02021 785316, 
Bergdolt, Kaiserstraße 119, 5600 Wuppertal 11 
(öfter vers) 

Suche Halma-Prgr. 16x16 Quadrat für 6128, 

grün auf 3" Diskette 

Petrenz. Dobel 7, 7517 Waldbronn, 


dBase2-biete 115 DM (06184)2762 


Suche für Joyce Programme 
für Versicherungsagentur aller Art 
Armbruster W., Alte Landstr. 6, 
7614 Gengenbach. 


Suche M80 mit Manual und andere CP/iWs 
per Vortex Tel (02 09) 77 7618 


Suche: FamilienstammDaurn, 
Sporttabellen (Kegeln) 
für: CPC 6128, Drucker NL-10 
Ruh, Im Kirchfeld 14, 7601 Schutterwald 


Wichtiger Hinweis für alle Kleinanzeigeninserenten 


Der Verlag behält sich vor, bei Softwareangeboten indizierte Spiele ersatzlos zu streichen. 
Folgende Video- und Computerspiele sind indiziert: 


Battlezone 
Beach Head 
Beach Head 
Blue Max 


(BPS-Report — August — 4/1986 S 48) 

Desert Fox Raid over Moscow 

F 15 Strike Eagle Rambo, First Blood Part 

Green Beret River Raid 

Paratrooper Seafox/Seawolf 


Skyfox 
Speed Racer 
Stalag I 
Tank Attack 
Theatre Software 
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I—Kleinanzeigen 


Suche für Joyce: 

Programm für Verwaltung von Basketballtabel 
len und Programm 
für Transponieren von Musikstücken 
Rainer Lange, Schweriner Sir. 5. 

2172 Lamstedt Telefon (04773) 74 72 


Wer erstellt m i ein Bio Rhythmus-Programm 
nach meinen Angaben? 

P. Paske, Schülzenhof 99,4470 Meppen 
Telefon (05931) 71 77 


Suche Hardware 


Joyce oder Joyce Plus 
f. Kepper, Karläuserslr. 64a, 7800 Freiburg 


Gebt. Pleiter ges Tel (02 08) 86 34 73 


Tausch 


Joyce PCVV 8256, suche und tausche Super 
Software. Klaus Stückler, 7614 Gengenbach, 
Kolpingstraße 13 


CPC 6128: Tausche Tasword + Word Star 
oegen Turbo-Pascal Comp 
fei (06594) 14 07 


He, Bastler: Tausche MP2 (neu) gegen 
selbstgebauter Modulator aus Heft 11 
(wenn er läuft!): 

Leinen, Haberkamp 2,3008 Garbsen 


Tausche MICA 51/4" gegen Multiplan o.a 
Telefon (0911) 45 84 46 


• Tauschpartner gesucht • 

CPC 464 Disc/Cass. 

M Menkhaus Mittelburgstr. 25 
4500 Osnabrück Tel (0541)70630 


DR Draw/Multiplan für Joyce 
Suche Star-Base 

Nittmann, A-1C70 Wien, Lerchenlelderstr. 1-3 


MP1 (NEU) + Aufpreis gegen DD11 
Telefon (0761) 47 3663 18-19 Uhr 


Tausche cg. Aufpreis Grün Monitor und MP2 
gg Farbmonitor. 

Beck. Augsburg, Tel (0821) 71 5364 


Verschiedenes 


Kopiertoner preiswert 

Fa Thesing, Telefon (02 51) 5 5818 G 


CPC Internationa! 3/85-10/86 
komplelt VB 60,- DM, Tel (08441) 4378 


Floppy-Disks & Compulerpllegemittel i B ab 
DM 2,70, Preisinfo anfordern 
HOMANN-VERSAND, 

Aachener Str. 653,5000 Köln 41. 
0(0221)494339 G 


3” —51/4 

Wer kopiert mir S'-'Disketlen 
(CP/M2.2 + 30 + ASCII) 
auf 51/4'-'Disketten?? 
Angebote an 

W. Lieberherr, Dammwiesenstr. 13 
CH 8406 Winterthur/Schweiz 


Das ist Ihre Chance... 
schon eine Kleinanzeige 
bringt oftmals großen Erfolg 
und hilft neue Kontakte 
knüpfen. 


Nutzen Sie unser Angebot 
und profitieren Sie von der 
Tatsache, daß unsere Zeit¬ 
schrift 

»PC Schneider 
International '« 
jeden Monat von mehreren 
zig-tausend Computer-In¬ 
teressierten gelesen wird. 
Möchten Sie etwas verkau¬ 
fen, tauschen oder suchen 
Sie das »Tüpfelchen auf 
dem i« - dann sollten Sie 
die eigens hierfür bestimm¬ 
te Bestellkarte im Heft aus¬ 
füllen und an unseren Ver¬ 
lag absenden. 

Ihre Annonce erscheint 
dann in der nächsterreich¬ 
baren Ausgabe. 

Wir möchten ausdrücklich darauf hinwe* 
sen, daß wir keine Anzeigen verötfentfi 
chen aus denen ersichtlich ist daß es sich 
hierbei um Veräußerungen von Raubko¬ 
pien handelt 

Des weiteren machen wir darauf aufmerk 
sam, daß indizierte Computerspiele nicht 
in Form von Anzeigen beworben werden 
dürfen 

Die Redaktion 


Activision.168,53,15 

Byte me.73 

Carat Soft.47,139 

Co mal.73 

Computer Büromaschinen Service ...37 

Computer Max.51 

Computer Studio Offenbach.79 

CSE Schauties.9,12 

Data Becker.69,111 

DM V.115,126,141,165,167 

Dobberti n .149 

EDV Effertz.8 

Elcos.18 

Elektor.137 

Elektronik Center.10 

Eschcomp.99 

Fischertechnik Computing.89 

Fr icke.29 

G Computerstore.41 

G+W.79 

Gamesoft. 119 


Inserenten 


Ge rd es.112 

GFA Systemtechnik. 2 

Habersetzer.154 

Heimcomputer Shop.95,123 

Infosystem s. 67,81 

Innowave. 91 

fahn.88 

Janfeld. 118 

Kempenich. 8 

Kingsoft.34 

Kopisch. 45 

Micro Market Worms.29 

Mükra.71 

Naujoks.149 

Philo soft. 10 

PiZie Data.49,65.101 

PR 8 Software dienst.49 

Prosoft. 121 

Remax.118 

Rose.37 

Rushware .59,117 


SFK. 

Sikos. 

.11 

. 41 

SKG-Bank . 

. 45 

Software Versand Hamburg.147 

Sybex. 

.7 


.109 

Synelec. 

.43 

Schneider Computer 

.55,57 

Schneider Data. 

. 105 

Schlingel . 

.88 

Schuster . 

83,84.85,86 

Star Division. 

...77,103,129 

TG-Soft. 

. 19 

Van der Zalm. 

.98 

Vogel Verlag. 

. 13 


25.27.31,154 

Weeske. 

...22,23,153 

Werder. 

.99 

WHS. 

.119 

Wörlein. 

. 17 

ZS-Soft. 

.75 
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Abonnementpreise 

Die Preise verstehen sieh grundsätzlich einschließlich Por¬ 
to und Verpackung 

Inland: 

Jahresbezugspreis: DM 60,— 

Halbjahresbezugsprcis: DM 30. - 
Europäisches Ausland: 

Jahresbezugspreis: DM 90, 
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nehmigung des Verlages 

Namentlich gekennzeichnete Freuidheitr.ige gehen nielu in je¬ 
dem Fall die Meinung der Redaktion w icder 


Mitglied der Inforiruitionsgemeinschall , 

zur Feststellung der Verbreitung von V 

Werbeträgern c.V |1VW). Bad Godesberg W 
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copyshop anzeige 



PEN 


TRANSP O 


Hft 

OOÜüi 


INK 21 SHIFT + + 


komfortable Menuesteuerung 
für Bildgestaltung 


und Farben/Raster-Auswahl 


Hardcopy-Simulation 
auf den Bildschirm 


beliebige Ausschnitts- 
Vergrößerungen 


Hardcopies in 
4 verschiedenen 
Formaten 


COPYSHOP im Detail: 

- Hardcopy in 4 (!) Formaten: DIN A4, DIN A5, 

13,5x8,5cm und 21,5x 13,5cm 

- superschnelle Hardcopy-Routine: DIN A4 in ca. 4 Minuten 

- arbeitet in allen 3 Modes 

- Anpaßmenue für JEDEN Epson-kompatiblen Drucker 

- 32 Farbraster über Menue wählbar 

- Grafikeditor 

- komfortable Pull-Down-Menues 

- schnelle Fill-Routine 

Und die Weltneuheit: Hardcopy-Simulator auf dem Bildschirm!! 

Sie können sich Ihre Hardcopy vor dem endgültigen Ausdruck auf dem Bildschirm ansehen! 

COPYSHOP ist das ultimative Hardcopy-Programm für alle Schneider Computer. 
Erhältlich auf Kassette (DM 59,-)* und 3"-Diskette (DM 69,-)* 
inkl. ausführlicher Bedienungsanleitung. 

"unverbindliche Preisempfehlung 

COPYSHOP gibt es im guten Fachhandel oder direkt bei: 

DMV-Verlag, Fuldaer Straße 6, 3440 Eschwege 

BEI DIREKTZUSTELLUNG ZZGL. DM 1- PORTOfVERPACKUNG, PER NACHNAHME ZZGL NACHNAHMEGEBÜHR 
IN DAS AUSLAND IST NACHNAHME NICHT MÖGLICH 

— Bitte Bestellkarte benutzen — 


beliebige Ausschnittvergrößerungen 
Bildschirm invertieren 

selbstrelozierbare Hardcopy-Routinen für eigene Programme 
neue Save- und Load-Routinen erkennen automatisch Mode 
und Farbwerte 

Freezer - saved auf Tastendruck Screenshots aus laufen¬ 
den Programmen, die anschließend ausgedruckt 
werden können 


Händleranfragen erwünscht 









[—Vorschau 



»PC Schneider International« 
erhalten Sie ab 31. Dezember 
bei Ihrem Zeitschriftenhändler 



Zum zweiten Mut führt die PC Schneider Internatio¬ 
nal die Wahl zur Software des Jahres durch. Alle Le¬ 
sersind zum Mitmachen aufgerufen, den Gewinnern 
winken wertvolle Preise. 


Joyce 


Joyce-Hardware und Zubehör auf einen 
Blick. In einer großen Aufstellung finden 
Sie alles rund um den Joyce: Speicherer¬ 
weiterungen, Zweitlaufwerke, Drucker. 
Joysticks u.v.m. 

Zum Thema »Grafik mit Joyce«, haben wir 
wieder einen echten Leckerbissen für Sie 
parat: Die Einbindung eines BASIC- 
Befehls zum Erzeugen von Musterfills. 


PC 


Die neu ins Leben gerufene Rubrik »Pro¬ 
fessional Computing« bringt viele interes¬ 
sante Informationen zu PC-Hard- und Soft¬ 
ware. Ein wesentlicher Schwerpunkt wird 
die ausführliche Vorstellung der GEM- 
Software von Digital Research sein, die in¬ 
zwischen als Low-Cost Versionen erhält¬ 
lich sind. 



GSX — so heißt das Zauberwort, mit dem man auch 
dem Joyce tolle Grafiken entlocken kann Unser Bild 
zeigt einen Muster-Fill, erzeugt auf dem Joyce. Pro¬ 
gramm und Erläuterungen im nächsten Heft. 



Aus Frankreich stammt das Graphikscop, das erste 
Hardware-Produkt aus unserem Nachbarland. Gra¬ 
phikcop ist eine Mischung aus Digitalisieret und Plot¬ 
ter, mehr darüber in der nächsten Ausgabe. 


Software Review 


Tempest 
Tujad 
Druid 
Galvan 
Frost Byte 


Hardware 


Schneiderware #7 bietet Ihnen eine A/D- 
Wandlerkarte, mit der Sie analoge Signa¬ 
le jeder Art in den Rechner einiesen kön¬ 
nen. Achtung — mit Software- 
Überraschung. 


Serie 


Die nächste Folge unserer Super-Serie 
»Software Experiment« wird Sie mit einem 
Programm besonderer Art bekannt ma¬ 
chen. Wordmaster bestiehl durch hervorra¬ 
gende Algorythmen und ist für manche 
Überraschung gut. Doch mehr wollen wir 
hier natürlich nicht verraten — das müssen 
Sie unbedingt erleben! 


Neu 


CAD-Kurs für jedermann! 

Die nächste Ausgabe von PC Schneider In¬ 
ternational wird den ersten Teil unseres 
CAD-Systems anschaulich erläutern. Sie 
erfahren einiges über die Hintergründe von 
CAD und werden Stück für Stück in diese 
interessante Materie eingearbeitet. Zum 
Abschluß dieser mehrteiligen Serie werden 
Sie ein komplettes und sehr leistungsfähi¬ 
ges CAD-System zur Verfügung haben. 


Wettbewerb 


Zum zweiten Mal sind die Leser von PC 
Schneider International aufgerufen, ihre 
Software des Jahres 1986 zu wählen. Wie 
schon im vergangenen Jahr, werden wieder 
die besten Programme aus den Genres 
Spiele. Anwendungen und Utilities ge¬ 
sucht. 

Natürlich gibt es wieder wertvolle Preise 
zu gewinnen, jede Einsendung nimmt an 
unserer großen Verlosung teil. 


Tips & Tricks 


u.a. 

Datagen 

- ein superkomlörtabler Datagenerator! 
Erzeugt auf einfache Weise Data-Zeilen 
aus Maschinencode. 

Mini-BOS 

- Bankmanager für CPC 464! 


Abenteuer 


Infocom strikes back 
Die Bostoner Infocom-Truppe präsen¬ 
tiert dem Abenteuerfan wieder einmal 
ein echtes Prachtspiel. »Leather God- 
desses of Phobos« ist ein eindeutig 
zweideutiges SF-Adventure. In der Tra¬ 
dition von Buck Rogers und Flash Gor- 
don muß der Held der Erde, Lane Ma¬ 
stodon, die Welt vor den üblen Plänen 
der Phobos Amazonen bewahren. Was 
es nun mit der Zweideutigkeit und den 
drei verschiedenen Spiel-Modes auf 
sich hat, lesen Sie im nächsten Heft. 
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JOYCE 


Ijtr.j. 


Bunt gemischtes 
Anwender-Paket für 
den Joyce-Texter: 

Buch + Diskette 
mit Wort-Experimenten, 

Tips und Tricks, einem Layout- 
Archiv, dem LocoScript-Software- 
Training, literarischen Text-Beispie¬ 
len, »historischen Simulationen, Insider- 
Plaudereien und feuilletonistischen Ab¬ 
wegen«, theoretischen Notizen und vie¬ 
les mehr. 

Ein Wegweiser durch die Welt der Text¬ 
verarbeitung. 

Abwechslungsreicher Lesestoff für Neu¬ 
linge und Fortgeschrittene, der über die 
Grenzen des Computerschreibtischs hin¬ 
ausführt. 


Auf Diskette: 

1. Der »LocoSript-Zettelkasten« 

bietet direkten Zugriff auf zahlreiche 
LocoSript-Standard-Schablonen in 
über 50 Dateien. 

Dazu: Mustertexte, Editierübungen, 
Schriftbeispiele, Serienbriefe, 
Spaltendruck, Tabellen, Telefon¬ 
register, typografische Experimente, 
Text-Kostproben, und vieles mehr. 


2 . WordStar-Tastendefinitionsdatei 

mit Referenzkarte, WS-Stapeldatei für 
Startdiskette (beides individuell anzu¬ 
passen). 


3. 


LOGO- und BASIC-Programme 

zur Erstellung computergenerierter 
Sätze und Gedichte. 




Buch + Diskette 
für LocoScript und WordStar-Autoren L 

210 Seiten, Einband: Leinen-Hardcover 
Buch und 3”-Diskette zum Preis von 89,- DM 
(unverbindliche Preisempfehlung) 

Zu beziehen über den Computerhandel und den guten Fachbuchhandel 
oder direkt beim Verlag. Händleranfragen erwünscht. 

DMV Verlag - Fuldaer Straße 6 • Postfach 250 ■ 3440 Eschwege 


— Bitte Bestellkarte benutzen — 
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AMSTRAD- SCHNEIOER' DISK 


pv DAVID PmMOBE 


. Activision Deutschland GmbH. 
Postfach 760680.2000 Hamburg 76. 
VERTRIEB DEUTSCHLAND . 
'Ariolasoft {Exclusiv-Distributor). 
Rushware (Autorisierter Mitvertrieb}. 

VERTRIEB ÖSTERREICH 
Karasbft (Exclusiv-Distributor). 
VERTRIEB SCHWEIZ: 
Elepro (Distributor) - Hilcu (Distributor). 


irhäMith für Sihneider CPC als 
Cassette und Diskette. 
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